Condition SI 'ligne Supprimer alors supprimer aussi ces lignes
kal054
Messages postés
2
Date d'inscription
Statut
Membre
Dernière intervention
-
kal054 Messages postés 2 Date d'inscription Statut Membre Dernière intervention -
kal054 Messages postés 2 Date d'inscription Statut Membre Dernière intervention -
Bonjour à tous,
Je suis en train de créé un devis Type, dans lequel se trouve plusieurs 'sections'/poste de travaux . J'aimerais pouvoir utiliser ce modèle pour créé rapidement des devis pour les clients en fonction de leurs travaux . Chaque 'chapitre' de travaux contient plusieurs lignes.
La question : je veux pouvoir mettre une condition qui fait que : quand je supprimer un poste de travaux, cela supprime automatiquement toutes les lignes qui lui sont liés ; Dans l'exemple ci-joint, en supprimant uniquement la ligne 'Etude de faisabilité' cela supprimera toutes les autres jusqu'au
prochain poste, ligne 23.
Je vous remercie par avance pour votre aide :)
Je suis en train de créé un devis Type, dans lequel se trouve plusieurs 'sections'/poste de travaux . J'aimerais pouvoir utiliser ce modèle pour créé rapidement des devis pour les clients en fonction de leurs travaux . Chaque 'chapitre' de travaux contient plusieurs lignes.
La question : je veux pouvoir mettre une condition qui fait que : quand je supprimer un poste de travaux, cela supprime automatiquement toutes les lignes qui lui sont liés ; Dans l'exemple ci-joint, en supprimant uniquement la ligne 'Etude de faisabilité' cela supprimera toutes les autres jusqu'au
Je vous remercie par avance pour votre aide :)
A voir également:
- Condition SI 'ligne Supprimer alors supprimer aussi ces lignes
- Supprimer rond bleu whatsapp - Guide
- Supprimer page word - Guide
- Supprimer pub youtube - Accueil - Streaming
- Partager photos en ligne - Guide
- Fichier impossible à supprimer - Guide
2 réponses
Bonjour,
en vba se mettre sur la feuille concernée et faire Alt F11 pour accéder à l'éditeur
cette macro se déclenchera au double clic colonne B de la ligne à supprimer:
bien que je ne vois pas l'utilité d'une macro, vu qu'il très facile de sélectionner les lignes à supprimer!
en vba se mettre sur la feuille concernée et faire Alt F11 pour accéder à l'éditeur
cette macro se déclenchera au double clic colonne B de la ligne à supprimer:
Option Explicit Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) Dim i As Integer Dim DerniereLigneUtilisee As Long Dim ligne As Integer If Not Application.Intersect(Target, Range("B:B")) Is Nothing Then DerniereLigneUtilisee = Range("B" & Rows.Count).End(xlUp).Row ligne = Target.Row Rows(Target.Row & ":" & Target.Row).Delete Shift:=xlUp 'supprime ligne en gras For i = 1 To DerniereLigneUtilisee If Range("B" & i).Font.Bold = True Then Exit For End If Next i Rows(ligne + 1 & ":" & i - 1).Delete Shift:=xlUp 'supprime toutes les lignes non gras jusqu'à ligne en gras End If End Sub
bien que je ne vois pas l'utilité d'une macro, vu qu'il très facile de sélectionner les lignes à supprimer!