June 6, 201114 yr J'ai fait une macro (excel), je suis une débutante qui n'y connaît pratiquement rien, j'essaie de faire en sorte de faire arrêter ma macro quand les cellules sont vides. Voici ce à quoi elle ressemble Sub Macro2() ' ' Macro2 Macro ' Macro enregistrée le 2011-06-05 par Lucie et Denis ' ' Dim xligne As Integer xligne = 4 Range("E" & xligne).Select For Each rw In Worksheets("sheet1").Rows xligne = ActiveCell.Row Range("E" & xligne).Select Selection.Copy Range("F" & xligne - 1).Select ActiveSheet.Paste Rows(xligne & ":" & xligne).Select Application.CutCopyMode = False Selection.Delete Shift:=xlUp 'xligne = xligne + 1 If Row.Value = Null Then Exit For Next rw ActiveWorkbook.Save End Sub Qui pourrait m'aider. Un immense merci
June 6, 201114 yr J'avoue ne pas avoir trop compris ce que tu voulais faire avec ta macro, mais bon. Pour ton problème, tu veux tester que la prochaine ligne est vide, et si elle l'est, tu veux arrêter ton traitement, c'est ça? Si oui, remplaces ton If Row.Value = Null Then Exit For par If Application.CountA(Rows(xligne + 1)) = 0 Then Exit For Philippe
June 7, 201114 yr Par contre ça serait bien que ça soit dans la bonne section Edited June 7, 201114 yr by Amnesiac
June 7, 201114 yr Author Merci du commentaire, toutefois pourriez-vous m'indiquer la bonne section. Je suis nouvelle.
Archived
This topic is now archived and is closed to further replies.