selection sur critères avec VBA - VB/VBA/VBS - Programmation
Marsh Posté le 22-08-2006 à 10:04:39
Le souci c'est que j'ai une fiche entreprise avec liste déroulante. A partir de cette fiche j'aimerais faire un certain nombre d'applications; ex: choisir par nationalité, effectif <20, CA<1000000.... 
Donc je vois qu'une macro pour faire tout ça. J'en ai bidouillé une. Tout va bien mais j'ai un nouveau problème: je souhaiterais ne selectionner qu'un certain nombre de colonnes par rapport à la feuille d'origine ("données générales" ).  Voici ma macro (selection des entreprises françaises): 
 
Sub EntreprisesFrançaises() 
j = 2 
l = 2 
Sheets("Données générales" ).Select 
Range("G6" ).Select 
For i = 1 To Range("AA65536" ).End(xlUp).Row 
    Range("G" & j).Select 
    If ActiveCell.Value = "France" Then 
        Range("A" & j & ":" & "AA" & j).Select 
        Selection.Copy 
        Sheets("recherche critères" ).Select 
        Range("A2" ).Select 
line1: 
        If ActiveCell.Value = "" Then 
            ActiveSheet.Paste 
            Selection.Offset(1, 0).Select 
        Else 
            Selection.Offset(1, 0).Select 
            GoTo line1 
        End If 
    Else 
        Selection.Offset(1, 0).Select 
    End If 
    j = j + 1 
    Sheets("Données générales" ).Select 
Next i 
End Sub 
Marsh Posté le 21-08-2006 à 19:55:03
Bonjour à tous
Je travaille actuellement sur une base de données Excel dans laquelle sont repertoriées des caractéristiques pour une centaine d'entreprises.
Je souhaiterais selectionner des entreprises en fonction de critères (nationalité, effectifs...).
Ex : les entreprises françaises, les entreprises de plus de 20 salariés...
Je ne parviens pas à trouver la macro adequate, je vous remercie d'avance si vous avez la réponse.