Boucle pour amateur
AskTheCanadian
Messages postés
28
Statut
Membre
-
pijaku Messages postés 13513 Date d'inscription Statut Modérateur Dernière intervention -
pijaku Messages postés 13513 Date d'inscription Statut Modérateur Dernière intervention -
Bonjour, je suis débutant en VBA et je désire faire une boucle.
Plutôt que d'exécuter ma macro 2585 fois je me disais que je pourrais apprendre comment faire une boucle. Un coup de main serait apprécié.
Merci ! ! !
Voici mon code :
Sub VFRUN()
'
' VFRUN Macro
'
' Touche de raccourci du clavier: Ctrl+o
'
Range("S8:U8").Select
Selection.Copy
Sheets("VF Output").Select
Range("B3").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Rows("3:3").Select
Application.CutCopyMode = False
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
Sheets("VF").Select
Range("T12").Select
Selection.Copy
Range("T11").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("T22").Select
Application.CutCopyMode = False
Calculate
End Sub
Plutôt que d'exécuter ma macro 2585 fois je me disais que je pourrais apprendre comment faire une boucle. Un coup de main serait apprécié.
Merci ! ! !
Voici mon code :
Sub VFRUN()
'
' VFRUN Macro
'
' Touche de raccourci du clavier: Ctrl+o
'
Range("S8:U8").Select
Selection.Copy
Sheets("VF Output").Select
Range("B3").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Rows("3:3").Select
Application.CutCopyMode = False
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
Sheets("VF").Select
Range("T12").Select
Selection.Copy
Range("T11").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("T22").Select
Application.CutCopyMode = False
Calculate
End Sub
1 réponse
Salut,
Tu veux boucler sur quoi?
Des feuilles? des lignes, des colonnes , des objets, des cellules, des caractères?????
Allez commençons bien la journée par la lecture d'un tuto de Silkyroad...
Tu veux boucler sur quoi?
Des feuilles? des lignes, des colonnes , des objets, des cellules, des caractères?????
Allez commençons bien la journée par la lecture d'un tuto de Silkyroad...