Discussion :

[electrons]

Bonjour,

J'ai un petit problème avec la fonction "MAJUSCULE" que j'utilise dans une macro VBA dont le but est simplement de créer une nouvelle cellule avec le contenu d'une autre mais en majuscule, un peu comme si ma référence restait un "Variant".

Voici le code utilisé :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
Dim Compteur as Integer
 
Worksheets("Ref").Cells(Compteur, 9).FormulaR1C1 _
        = "=MAJUSCULE(H" & Compteur & ")"

J'ai essayé (HCompteur) (H:Compteur).... rien n'y fait, j'ai toujours l'erreur "#NOM# alors que la formule est bien inscrite dans la cellule

J'ai aussi testé en remplaçant FormulaR1C1 par Formula.
Serait-il possible aussi d'écrire du code du style :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
Dim Compteur as Integer
Dim Colonne as Integer
 
Worksheets("Ref").Cells(Compteur, 9).FormulaR1C1 _
        = "=MAJUSCULE(Cells(" & Compteur & ", " & Colonne & ")"

Merci d'avance pour votre aide.

[EngueEngue]

utilise .formulalocal pour que ton vba sache parler français...

Sinon il y a une méthode vba pour cela

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Worksheets("Ref").Cells(Compteur, 9) = UCASE(cstr(Worksheets("Ref").Cells(Compteur, 8).value))

[electrons]

Merci EngueEngue,

Ca marche du premier coup même si l'écriture parait plus compliquée.
Le principal est l'efficacité.

Bonn journée