Copie de cellules avec une condition

MoW · 25 Mai 2005

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]

dg62 · 25 Mai 2005

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

MoW · 26 Mai 2005

Bonjour dg62,
J'ai appliqué ta fonction et ca marche du tonnerre
Merci infiniment !

Bonne journée à tous !

Copie de cellules avec une condition

MoW

Guest

Pièces jointes

dg62

XLDnaute Barbatruc

MoW

XLDnaute Nouveau

Discussions similaires