Langague macro
Résolu
JOLARITALE
Messages postés
149
Statut
Membre
-
JOLARITALE Messages postés 149 Statut Membre -
JOLARITALE Messages postés 149 Statut Membre -
Bonjour,
En langue macro comment dit on
"cherche dans la cellule C5 des feuille A à W"
et comment dit on aussi
"dans la feuille que tu trouvera cherche "X""
Puis " dans la ligne du "X" ecris "V" en colonne J"
j'aimerais tant faire mes macros toutes seule mais il me manque l'essentiel : "les fonction possibles"....
En langue macro comment dit on
"cherche dans la cellule C5 des feuille A à W"
et comment dit on aussi
"dans la feuille que tu trouvera cherche "X""
Puis " dans la ligne du "X" ecris "V" en colonne J"
j'aimerais tant faire mes macros toutes seule mais il me manque l'essentiel : "les fonction possibles"....
A voir également:
- Langague macro
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Télécharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Jitbit macro recorder - Télécharger - Confidentialité
- Macro maker - Télécharger - Divers Utilitaires
- Actiona macro - Télécharger - Divers Utilitaires
4 réponses
Bonjour,
1)
Dim w As Worksheet
For Each w In Worksheets
If w.Name = "Feuil2" Then
' faire ceci
End If
Next w
Selon comment sont nommées tes feuilles tu peux tester sur un nom refabriqué pour alléger le code.
Par exemple :
If left(w.Name,2) = "D_" : le code s'executera sur toutes les feuilles commençant par D_...
Ou bien tester les noms des feuilles ou le code ne doit pas s'appliquer (s'il y a moins de nom de feuilles à tester)
2) tu te mets en enregistrement de macro et tu adaptes le code.
3) cells(celluleX.row, n°colonne)= "V"
eric
1)
Dim w As Worksheet
For Each w In Worksheets
If w.Name = "Feuil2" Then
' faire ceci
End If
Next w
Selon comment sont nommées tes feuilles tu peux tester sur un nom refabriqué pour alléger le code.
Par exemple :
If left(w.Name,2) = "D_" : le code s'executera sur toutes les feuilles commençant par D_...
Ou bien tester les noms des feuilles ou le code ne doit pas s'appliquer (s'il y a moins de nom de feuilles à tester)
2) tu te mets en enregistrement de macro et tu adaptes le code.
3) cells(celluleX.row, n°colonne)= "V"
eric
Bonjour,
Ok je crois que c'est bon merci ;)
Par contre comment ont dit toutes les feuilles sauf la feuille "intel1", "intel2" et "intel3"?
Merci
Ok je crois que c'est bon merci ;)
Par contre comment ont dit toutes les feuilles sauf la feuille "intel1", "intel2" et "intel3"?
Merci
Bonjour,
If w.Name <> "Feuil2" and w.Name <> "Feuil3" and w.Name <> "Feuil4" Then
' faire ceci
end if
ou bien pour pourvoir le mettre sur plusieurs lignes s'il y en a bcp :
If w.Name = "Feuil2" or w.Name = "Feuil3" Then next w
If w.Name = "Feuil4" or w.Name = "Feuil5" Then next w
' faire ceci
Le mieux est quand même qu'elle démarrent par les mêmes caracteres
eric
If w.Name <> "Feuil2" and w.Name <> "Feuil3" and w.Name <> "Feuil4" Then
' faire ceci
end if
ou bien pour pourvoir le mettre sur plusieurs lignes s'il y en a bcp :
If w.Name = "Feuil2" or w.Name = "Feuil3" Then next w
If w.Name = "Feuil4" or w.Name = "Feuil5" Then next w
' faire ceci
Le mieux est quand même qu'elle démarrent par les mêmes caracteres
eric
oK
Merci
beaucoup
ca y est mon programme est terminé ;)
je suis trop contente
Merci beaucoup a vous tous qui m'avez aidé :)
sans vous je serrais vraiment dans le petrin ;)))
je ne sais comment vous remercier! si vous n'étiez pas tous des internet de super lion je vous aurais tous invité a boir un verre mais la... ça reduit pas mal les possibilité lol
encore merci et bonne journée
Merci
beaucoup
ca y est mon programme est terminé ;)
je suis trop contente
Merci beaucoup a vous tous qui m'avez aidé :)
sans vous je serrais vraiment dans le petrin ;)))
je ne sais comment vous remercier! si vous n'étiez pas tous des internet de super lion je vous aurais tous invité a boir un verre mais la... ça reduit pas mal les possibilité lol
encore merci et bonne journée