VBA - Remplir le contenu de la plage active

Résolu
jokair8 Messages postés 15 Statut Membre -  
jokair8 Messages postés 15 Statut Membre -
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
Configuration: Windows XP
Firefox 2.0.0.16

4 réponses

  1. jokair8 Messages postés 15 Statut Membre 2
     
    Ca marche !!!

    Merci
    2
  2. wilfried_42 Messages postés 912 Statut Contributeur 245
     
    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
    1. jokair8 Messages postés 15 Statut Membre 2
       
      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
  3. wilfried_42 Messages postés 912 Statut Contributeur 245
     
    re:

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