VBA macro, copier des cellules dans des .....
Résolu
hamouchka
Messages postés
14
Statut
Membre
-
hamouchka Messages postés 14 Statut Membre -
hamouchka Messages postés 14 Statut Membre -
Bonjour,
Mon problème c'est assez bizzard, j'ai deux colonnes (A et B) de 780 lignes, il faut que je copie le contenu des cellules de la colonne B dans des commentaires attachés aux cellules de la colonne A juste à coté. Evidement créer 780 commentaires manuellement ne me tente pas ! J'aimerai ca automatiser la tâche !
Est-ce que c'est faisable en VBA ?
Merci beaucoup
Mon problème c'est assez bizzard, j'ai deux colonnes (A et B) de 780 lignes, il faut que je copie le contenu des cellules de la colonne B dans des commentaires attachés aux cellules de la colonne A juste à coté. Evidement créer 780 commentaires manuellement ne me tente pas ! J'aimerai ca automatiser la tâche !
Est-ce que c'est faisable en VBA ?
Merci beaucoup
1 réponse
-
Bonjour,
Oui c'est possible. Essayez ceci :
Sub AjoutCommentaire()
Application.ScreenUpdating = False
Dim i As Integer
For i = 1 To 780
Range("A" & i).Select
Range("A" & i).AddComment 'Ajoute le commentaire
Range("A" & i).Comment.Visible = False 'Passez l'option à "True" pour maintenir le commentaire affiché
Range("A" & i).Comment.Text Text:="" & Range("B" & i).Value
Next
Range("A1").Select
Application.ScreenUpdating = True
End Sub
Bonne soirée,
