Copie de cellules avec une condition

  • Initiateur de la discussion MoW
  • Date de début
M

MoW

Guest
Bonjour à tous,
Après plusieurs recherches infructueuses je me tourne vers vous. Mon problème est (me semble t'il) simple mais je n'y connais rien en Excel VBA, alors forcément je rame un peu :)
Suite au retrait de la fusion de certaines cellules, certaines cellules sont désormais vides...
Je voudrais pouvoir y copier l'info de la cellule précédente (le fichier joint expliquera ca mieux que moi) si la cellule est vide.
L'algo serait quelquechose comme :

si la cellule A(n) est vide
alors recopie dans A(n) la valeur de A(n-1)

Manuellement le processus est facile, mais mon tableau comporte près de 20 000 lignes...

Merci pour votre indulgence pour la question de débutant ;)
Et surtout merci d'avance pour votre aide !!
[file name=Feuille.zip size=1696]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Feuille.zip[/file]
 

Pièces jointes

  • Feuille.zip
    9.9 KB · Affichages: 17
  • Feuille.zip
    9.9 KB · Affichages: 19
  • Feuille.zip
    9.9 KB · Affichages: 16

dg62

XLDnaute Barbatruc
Bonsoir MoW


une petite procédure pour te dépanner;

tu sélectionnes tes données et tu lances la macro


Code:
Sub recop()
Dim cel As Range

For Each cel In Selection
If cel.Value = '' Then
cel.Value = cel.Offset(-1, 0).Value
End If
Next
End Sub
 

Discussions similaires

Statistiques des forums

Discussions
312 429
Messages
2 088 351
Membres
103 824
dernier inscrit
frederic.marien@proximus.