vba si a73 est selectionner dans macro then exit sub

Question

Bonjour je me suis lancer dans le vba excel pour la première fois
Je tente de faire une boucle pour réinitialiser ma feuille

Tout d'abord j'ai fait un template de base qui comporte
 entêtes
1 liste qui est filtré a 1 linge de calcule 
1 ligne de sous total de la ligne precedante en tenent compte de la qte
1 macro qui copie d une feueille a l autre   1 liste et une ligne pour ajouté jusqu'à 100 lignes au besoins
En suite il a le sous total de tout les ligne ajouté suivie des taxe et grand total

Vous comprendrez je dois faire une boucle qui va effacer dans un ordre specifique les diferent element
Ce qui fonction deja si j efface une ligne a la fois. 

Lorceque je la met en boucle je dois créé une condition pour sortire de la boucle

Cette condition est:

Si ("A73") est sélectionner a un moment dans ma boucle  then exit for ou sub

Je ne connait pas du tout la syntaxe pour cette expretion j ai eu des message d erreur sur tout celle que j ai tenter
Si vous pouvez m aider ca fait plusieurs soire que je cherche

Merci

liquidaxis · Answer

voici mon code pour le moment :

For i = 1 To 99
        Range("A65536").Select
        Selection.End(xlUp).Offset(1, 0).Select
        Selection.EntireRow.Delete
        Selection.End(xlUp).Offset(-67).Activate
        If IsEmpty(ActiveCell) Then Exit Sub
        If IsEmpty(ActiveCell.Offset(-1, 0)) Then Set TopCell = ActiveCell Else Set TopCell = ActiveCell.End(xlToLeft)
        If IsEmpty(ActiveCell.Offset(1, 0)) Then Set BottomCell = ActiveCell Else Set BottomCell = ActiveCell.End(xlToRight).End(xlDown)
        Range(TopCell, BottomCell).Select
        Selection.ClearContents
        Selection.EntireRow.Delete
    
Next
End Sub

Vba si a73 est selectionner dans macro then exit sub

1 réponse

Votre réponse

Discussions similaires

Newsletters