VBA - Remplir le contenu de la plage active

Résolu/Fermé
jokair8 Messages postés 14 Date d'inscription mercredi 20 août 2008 Statut Membre Dernière intervention 30 septembre 2010 - 21 août 2008 à 16:29
jokair8 Messages postés 14 Date d'inscription mercredi 20 août 2008 Statut Membre Dernière intervention 30 septembre 2010 - 25 août 2008 à 16:48
Bonjour,


Sous excel, en VBA, je cherche a remplir le contenu avec le texte suivant : "-" (tiret du 6) pour les cellules vides de la plage (range) sélectionnée.

Merci pour votre aide!

j'ai essayé ça sans succès:

Private Sub cmd_tiret_Click()

If Activeworksheet.Range(ActiveCell.CurrentRegion.End(xlUp).row) = "" Then _
Activeworksheet.Range(ActiveCell.CurrentRegion.End(xlUp).row) = "-"

End Sub

4 réponses

jokair8 Messages postés 14 Date d'inscription mercredi 20 août 2008 Statut Membre Dernière intervention 30 septembre 2010 2
25 août 2008 à 16:48
Ca marche !!!

Merci
2
wilfried_42 Messages postés 907 Date d'inscription mardi 19 août 2008 Statut Contributeur Dernière intervention 8 décembre 2009 244
21 août 2008 à 18:11
bonjour

essaye cela
 dim maplage as range
 set maplage = activecell.currentregion.specialcells(xlcelltypeblanks)
 maplage.value = "'-" '- etant un caractere mathematique, il faut une appostrophe devant pour lui dir que c'est du text

si pas bon :
 dim maplage as range, macel as range
 set maplage = activecell.currentregion.specialcells(xlcelltypeblanks)
 for each macel in maplage
      macel = "'-" '- etant un caractere mathematique, il faut une appostrophe devant pour lui dir que c'est du text
 next 
2
jokair8 Messages postés 14 Date d'inscription mercredi 20 août 2008 Statut Membre Dernière intervention 30 septembre 2010 2
22 août 2008 à 18:13
C'est pas mal du tout ça, le hic c'est que l'action (remplir les cases vides par des tirets) ne s'effectue pas sur la plage sélectionnée mais sur une plage plus grande...

Je vais chercher avec ce que tu viens de me donner !

Merci encore
0
eriiic Messages postés 24600 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 21 octobre 2024 7 239
21 août 2008 à 23:24
Bonsoir,
tu as déjà posé cette question hier http://www.commentcamarche.net/forum/affich 7988031 affecter un texte a des cellules vides#3.
Ca serait bien de répondre...
eric
2
wilfried_42 Messages postés 907 Date d'inscription mardi 19 août 2008 Statut Contributeur Dernière intervention 8 décembre 2009 244
22 août 2008 à 18:25
re:

remplacer activecell.currentregion par selection, pour ne faire que la plage selectionnée
2