Résultats de la recherche

  1. N

    compter nb de lignes dans une table situee sur autre feuille

    Bonjour =NBVAL('1993'!$B$B)-1 ou Code : =WorksheetFunction.CountA(Worksheets("feuil1").Range("b:b")) - 1 m'affiche un message d'erreur lorsque je veux les inserer dans la barre de formule de ma cellule d'affichage. 1993 est le nom de ma feuille. Les 2 sont fausses ?
  2. N

    copier lignes filtrées

    Bonjour Je ne comprends pas pourquoi mon code ne fonctionne pas. Je voudrais qu'il me selectionne var nb lignes d'une page filtrée pour les coller dans une autre feuille (var feuille). J'ai un message d'erreur "pas de cellules correspondantes nb = Sheets("commande").Range("C19") Dim...
  3. N

    coper n premieres lignes d'une feuille filtrée

    Bonjour Voici mon code pour filtrer le contenu d'une page selon 2 critères puis trier selon 2 autres critères. La macro fonctionne. Sub filtri() ' ' trans11 Macro ' Macro enregistrée le 17/11/2006 par IEN60 ' ' 'declare var Dim codest As String codest =...
  4. N

    annuler effet macro

    Bonjour Peut on annuler l'effet d'une macro par une autre macro puisque CTRL+Z ne fonctionne pas ? Merci
  5. N

    supprimer le filtre automatique

    Bonjour Existe t'il une commande vba pour faire disparaitre le filtre automatique ? Selection.AutoFilter ne me satisfait pas car il commute start/stop le filtre automatique ce qui me pose des problèmes en fonction des macros qui ont été réalisées avant. Merci.
  6. N

    copier n lignes d'une table dans une autre table

    Bonjour 1/ Je souhaiterais sélectionner n lignes de l'enregistrement de la feuille 1(n étant un nombre dans la feuill2 cellule e4) 2/ Puis modifier les valeurs de la colonne obtention des lignes selectionnées en 'servi' 3/ Enfin copier ces données et les coller dans la feuill2 à la...
  7. N

    Selectionner_n_champs_coller_dans_autre_feuille

    Bonjour à tous Je souhaiterais modifier les lignes du code A> pour me permettre de sélectionner n enregistrements n étant lui même tapé par l'utilisateur dans une cellule Sub Selectionner_n_champs_coller_dans_autre_feuille() Sheets("Feuil1").Select ' A> Ligne du dessous je...