Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Philippe.R
Bonsoir François-Xavier,
Sub varencel() 'renseigne les cellules correspondant aux données ci dessous lesref = Array("M2", "Q2", "I4", "I5", "I6", "I7", "I9", "I10", _ "I11", "I12", "I14", "I15", "I16", "I17", "I18", "I23", "I24", "I26", "I27") For Each zzz In lesref Range(zzz).Value = zzz Next zzz End Sub
Y a-t-il quelque ruse pour simplifier ce charabia infâme ? Un array(...) peut-être ? Mon neurone a beau tourner autour, il ne trouve pas le centre :o)
Merci d'avance et @+ FxM
Bonsoir François-Xavier,
Sub varencel()
'renseigne les cellules correspondant aux données ci dessous
lesref = Array("M2", "Q2", "I4", "I5", "I6", "I7", "I9", "I10", _
"I11", "I12", "I14", "I15", "I16", "I17", "I18", "I23", "I24", "I26", "I27")
For Each zzz In lesref
Range(zzz).Value = zzz
Next zzz
End Sub
Sub varencel() 'renseigne les cellules correspondant aux données ci dessous lesref = Array("M2", "Q2", "I4", "I5", "I6", "I7", "I9", "I10", _ "I11", "I12", "I14", "I15", "I16", "I17", "I18", "I23", "I24", "I26", "I27") For Each zzz In lesref Range(zzz).Value = zzz Next zzz End Sub
Y a-t-il quelque ruse pour simplifier ce charabia infâme ? Un array(...) peut-être ? Mon neurone a beau tourner autour, il ne trouve pas le centre :o)
Merci d'avance et @+ FxM
FxM
Bonsoir François-Xavier,
Sub varencel() 'renseigne les cellules correspondant aux données ci dessous lesref = Array("M2", "Q2", "I4", "I5", "I6", "I7", "I9", "I10", _ "I11", "I12", "I14", "I15", "I16", "I17", "I18", "I23", "I24", "I26", "I27") For Each zzz In lesref Range(zzz).Value = zzz Next zzz End Sub
semble fonctionner effectivement
Bonsoir Philippe,
Nous avons eu tous deux la même réaction. Oui mais non :o(
Avec cela, nous trouvons "M2" en cellule M2 tandis que je souhaiterais y voir la valeur affectée à M2 (par exemple 8.37).
@+ FxM
Bonsoir François-Xavier,
Sub varencel()
'renseigne les cellules correspondant aux données ci dessous
lesref = Array("M2", "Q2", "I4", "I5", "I6", "I7", "I9", "I10", _
"I11", "I12", "I14", "I15", "I16", "I17", "I18", "I23", "I24", "I26",
"I27")
For Each zzz In lesref
Range(zzz).Value = zzz
Next zzz
End Sub
semble fonctionner effectivement
Bonsoir Philippe,
Nous avons eu tous deux la même réaction. Oui mais non :o(
Avec cela, nous trouvons "M2" en cellule M2 tandis que je souhaiterais y
voir la valeur affectée à M2 (par exemple 8.37).
Sub varencel() 'renseigne les cellules correspondant aux données ci dessous lesref = Array("M2", "Q2", "I4", "I5", "I6", "I7", "I9", "I10", _ "I11", "I12", "I14", "I15", "I16", "I17", "I18", "I23", "I24", "I26", "I27") For Each zzz In lesref Range(zzz).Value = zzz Next zzz End Sub
semble fonctionner effectivement
Bonsoir Philippe,
Nous avons eu tous deux la même réaction. Oui mais non :o(
Avec cela, nous trouvons "M2" en cellule M2 tandis que je souhaiterais y voir la valeur affectée à M2 (par exemple 8.37).
@+ FxM
JpPradier
Bonsoir FxM
Pas testé mais peut-etre qu'un coup d' Evaluate(zzz) ?
j-p
Bonsoir FxM
Pas testé mais peut-etre qu'un coup d' Evaluate(zzz) ?
Bonsour® FxM, tiré de l'aide : Etiquettes et noms dans les formules
Les noms ne peuvent être identiques à des références de cellules, telles que Z$100 ou L1C1. !!!!!
@+
FxM
Bonsour® FxM, tiré de l'aide : Etiquettes et noms dans les formules
Les noms ne peuvent être identiques à des références de cellules, telles que Z$100 ou L1C1. !!!!!
@+
Mais les noms de variables I2, M2, H47 sont parfaitement acceptés dans VBA ! Et on peut les transférer sur une feuille en prenant la peine de désigner chaque cellule et chaque variable -> range("I2").value = I2 par exemple ... avec la multiplication des risques d'erreur.
En nommant les cellules, ça devrait pouvoir être possible mais tu connais mon coté flemmard. Je n'ai pas envie de me bouffer 47 fichiers différents avec un minimum d'une trentaine de cellules.
"Travaillez plus vite avec Office" ... MOUARFFFF ! Merci aux gentils contributeurs qui paient de leur temps et de leur argent pour nous aider à contourner les bugs des logiciels que nous avons payés !
@+ FxM (je ne m'énerve pas, j'explique)
Bonsour® FxM,
tiré de l'aide : Etiquettes et noms dans les formules
Les noms ne peuvent être identiques à des références de cellules, telles
que Z$100 ou L1C1. !!!!!
@+
Mais les noms de variables I2, M2, H47 sont parfaitement acceptés dans
VBA ! Et on peut les transférer sur une feuille en prenant la peine de
désigner chaque cellule et chaque variable -> range("I2").value = I2 par
exemple ... avec la multiplication des risques d'erreur.
En nommant les cellules, ça devrait pouvoir être possible mais tu
connais mon coté flemmard. Je n'ai pas envie de me bouffer 47 fichiers
différents avec un minimum d'une trentaine de cellules.
"Travaillez plus vite avec Office" ... MOUARFFFF !
Merci aux gentils contributeurs qui paient de leur temps et de leur
argent pour nous aider à contourner les bugs des logiciels que nous
avons payés !
Bonsour® FxM, tiré de l'aide : Etiquettes et noms dans les formules
Les noms ne peuvent être identiques à des références de cellules, telles que Z$100 ou L1C1. !!!!!
@+
Mais les noms de variables I2, M2, H47 sont parfaitement acceptés dans VBA ! Et on peut les transférer sur une feuille en prenant la peine de désigner chaque cellule et chaque variable -> range("I2").value = I2 par exemple ... avec la multiplication des risques d'erreur.
En nommant les cellules, ça devrait pouvoir être possible mais tu connais mon coté flemmard. Je n'ai pas envie de me bouffer 47 fichiers différents avec un minimum d'une trentaine de cellules.
"Travaillez plus vite avec Office" ... MOUARFFFF ! Merci aux gentils contributeurs qui paient de leur temps et de leur argent pour nous aider à contourner les bugs des logiciels que nous avons payés !
