Remplir un Tableau a partir d'un autre tableau selon des conditions (VBA)

[sylvestre09]

Bonjour le forum,
je me retourne vers vous car depuis une semaine je cherche a completer mon projet mais je n'y arrive pas voilà grace à un userform j'entre des données dans plusieurs page j'obtiens donc un tableau avec des opérations saisies (plusieurs lignes) j'aimerai qu'a coté de ce tableau qui existe dans chaque onglet faire un autre tableau avec moins de colonne mais qui sépare les montant négatives des montant positives en les classant selon leur date d'echéance je joint un exemple car c'est difficile d'expliquer !! le Rt souhaité est dans la feuille 2 !!! merci de me donner un coup de main non pas en faisant le travail demandé mais en me guidant un peu car je ne suis pas un pro de VBA
Merci a tous !

 

[Vorens]

Re : Remplir un Tableau a partir d'un autre tableau selon des conditions (VBA)

Un truc du style

'Ferme l'UserForm nommé UserForm1
Unload UserForm1

A mettre dans l’évènement du clic sur le bouton que tu choisis.

 

[sylvestre09]

Re : Remplir un Tableau a partir d'un autre tableau selon des conditions (VBA)

vorens voilà le code que j'ai mis mais ca ne fonctione pas erreur 91

Private Sub CB_1_Click()
'Déclaration des variables
Dim Ref As String
Dim l As Long
Dim ws As Worksheet

Do
Ref = InputBox(prompt:="Saisir la référence de l'opération à supprimer", Title:="Saisie")
Loop Until IsNumeric(Ref)

Select Case ws
       Case ("Feuil1")
       Case ("recap")
       Case Else
        
'Boucle de test pour evité les plantage en cas de saisie de lettre


'Boucle de suppression des lettres en partant du bas du tableau
'pour eviter les sauts si l'on part du début
'Ne nécessite pas un tableau trié
For l = Cells(65536, 3).End(xlUp).Row To 2 Step -1
    ' Test de la valeur en colone 3 pour suppression
    If Cells(l, 3).Value = (Ref) Then
        Rows(l).Select
        Selection.Delete (xlUp)
    End If
Next l

End Select
End Sub

sinon je te parlai de la croix rouge de l'inputbox et non pas du userform

 

[Vorens]

Re : Remplir un Tableau a partir d'un autre tableau selon des conditions (VBA)

Re,



Pas comme sa que le Case d'utilise

elect Case w


Case "toto"

Case "titi"

End Select

si la variable w = "toto" alors la case va sauter dedans et exécuter le code qui suis. etc etc

 

[sylvestre09]

Re : Remplir un Tableau a partir d'un autre tableau selon des conditions (VBA)

bonjour Vorens j'espère que tu vas bien stp j'ai besoin d'un coup de main sur ce post https://www.excel-downloads.com/threads/supprimer-des-cellules-si-la-date-est-a-aujourdhui.182585/
merci d'avance