Supprimer ligne entière en fonction de 2 combobox

boujour

voici mon problème:

j'aimeraie supprimer une ligne entière correspondant à une référence par rapport à 2 combobox

j'ai cherche un peu partout sur le net mais les essais ne sont pas concluants.....................

merci par avance

Bonjour

A tester

re

encore merci Banzai64, c'est toute à fait ça.

je débute alors je rame un peu...

merci

selon la fin de mon code, l'utilisateur enregistre son nouveau document dans le fichiers qu'il souhaite car j'active l'ouverture de l'onglet "enregistrer sous"

je souhaiterai dès lors pouvoir supprimer automatiquement mon document enregistré automatiquement qui se trouve dans mes documents pour éviter les doublons.

En effet, mon utilisateur n'enregistre son fichier dans mes documents mais directement dans le dossier de son choix

'ferme le usf si clique sur annuler'
Private Sub CommandButton_annuler_Click()

Unload Me
End Sub

'activation du bouton valider'
Private Sub CommandButton_valider_Click()

    'on cree et on renomme un nouveau classeur'
        'création de l'objet excel'
        Dim Nom1 As String
        Dim Nom2 As String
        Dim Nom As String

        Nom1 = TextBox_nom_de_la_societe
        Nom2 = TextBox_nature_de_l_operation

      'copie onglets'
      Worksheets(Array(" Données initiales", " Liasse", "Contrôles liasses", "Retraitement", "Actif", "Passif", "Compte de résultat", "BFR", "Flux", "Ratios", "Synthèse")).Copy

    'nommination du nouveau dossier'

    ActiveWorkbook.SaveAs "Synthèse Financière" & " " & Nom2 & " " & Nom1

'ajout des macro

Workbooks("AFI essai macro V4.xlsm").VBProject.VBComponents.Item("UserForm_ajouter_année").Export "Nom"

ActiveWorkbook.VBProject.VBComponents.Import "Nom"
Kill "Nom"
Kill "Nom.frx"

Workbooks("AFI essai macro V4.xlsm").VBProject.VBComponents.Item("Données_initiales").Export "Nom"

ActiveWorkbook.VBProject.VBComponents.Import "Nom"
Kill "Nom"

Workbooks("AFI essai macro V4.xlsm").VBProject.VBComponents.Item("UserForm_supprimer_année").Export "Nom"

ActiveWorkbook.VBProject.VBComponents.Import "Nom"
Kill "Nom"
Kill "Nom.frx"

    'fermer le userform'
    Unload UserForm_creation_synthese

    'message enregistrement nouveau dossier'
Call MsgBox("Veuillez enregistrer en format EXCEL PRENANT EN CHARGE LES MACRO", , "Important")

CommandBars(1).Controls(1).Controls(5).Execute

End Sub

Private Sub UserForm_Click()

End Sub