Excel - Macro

Y compris Power BI, Power Query et toute autre question en lien avec Excel
S
Soline
Nouveau venu
Nouveau venu
Messages : 2
Inscrit le : 6 septembre 2006

Message par Soline » 6 juin 2011, 18:37

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
M
Misterno
Membre fidèle
Membre fidèle
Messages : 184
Inscrit le : 1 juin 2011
Version d'Excel : 2003 FR

Message par Misterno » 6 juin 2011, 20:32

Bonjour,

Le fichier est censé faire quoi ?

Voici le principe de boucle :

Sub strute()
Dim Lecture As String
Dim Pointeur As Long
Pointeur = 1
Do
Lecture = Range("A" & Pointeur) ' Remplacer la colonne A par une colonne étant toujours renseignée
If Lecture <> "" Then

'Traitement

End If
Pointeur = Pointeur + 1
Loop Until Lecture = ""
End Sub
Définir son besoin est souvent la solution du problème.
Avatar du membre
Dan
Modérateur
Modérateur
Messages : 6'225
Appréciations reçues : 105
Inscrit le : 27 avril 2007
Version d'Excel : 2010, 2000, Mac 2011

Message par Dan » 6 juin 2011, 21:46

Bonsoir,

Le mieux serait de mettre un fichier en ligne.

Ce que je comprends. dans la colonne E on recopie les données de chaque cellule E en cellule F-1 et ce jusqu'à ce que la une cellule E soit vide dans cette colonne

Pas trop compris le pourquoi mais bon avec plus d'explication ou un fichier ce sera plus simple.

Amicalement
@+ Dan ;)
Répondre Sujet précédentSujet suivant
  • Sujets similaires
    Réponses
    Vues
    Dernier message