Microsoft 365 Mini macro en VBA

jderoque

XLDnaute Nouveau
Bonjour
je souhaite récupérer la valeur d'une case ici F1 : les valeurs texte vont de "01" à "99".
et l' insérer dans le nom d'une image avec le préfixe EMP.
le but, je change la valeur de la case F1 et je modifie la formule du nom de l'image qui va chercher une autre plage nommée EMP_01, EMP_02, etc.
je n'arrive pas a intégrer cela dans la formule.
Une idée?
Merci d'avance


Sub Maj_impression()
'
' Maj_impression Macro
'
Range("F1").Select
ActiveCell.FormulaR1C1 = "01" 'prendre la valeur de la cellule F1 (du texte)

ActiveSheet.Shapes.Range(Array("Picture 1")).Select
Selection.Formula = "=EMP_01" 'integrer la valeur de la cellule dans la formule du type EMP_ la valeur de F1

Range("C9").Select
End Sub
 

Discussions similaires

Statistiques des forums

Discussions
314 485
Messages
2 110 101
Membres
110 663
dernier inscrit
ToussaintBug