MAcro copier selon critere d'une colonne
Bonjour Forum
j'ai un fichier avec une feuille "base"
Je souhaiterais copier uniquement les lignes (et pas toutes les colonnes) dans la feuille "export" selon le critère suivant
si "N" apparait dans la colonne M
mais le mieux étant un fichier joint, je vous le mets ci dessous
merci
Robert
Bonjour
Excellent.
Serait-ce possible d'avoir le quadrillage également?
merci
Robert
Bonjour
Quand on met "n" au lieu de "N"; ça ne foncionne pas.
PArfois après plusieurs ajouts ou modification de "N" en "n" ou "O "et "o",le quadrillage disparait.
peut etre dois je vider la feuille export avant chaque "macro" ?
Merci
Robert
Bonjour
Ta demande initiale ne parlait pas de "n" , pas plus que de "o" ou de "O"
lato a écrit :
si "N" apparait dans la colonne M
Mais j'ai modifié...
Bonsoir
Effectivement je n'avais pas précisé que la colonne correspondait à la réponse Oui ou Non, traduite N/O
mais qui peut être écrite en majuscule ou minuscule.
Je ne pensais pas qu'il y avait une importance dans les majuscules en macro! maintenant je le sais
C'est parfait.
Un seul bug mineur, le quadrillage ne se fait pas dans la colonne des titres.
Robert
Bonsoir
lato a écrit :
Un seul bug mineur, le quadrillage ne se fait pas dans la colonne des titres.
Ce n'est pas un bug, c'est voulu. Pourquoi en changer puisque les cellules des titres ne changent pas.
Mais si il y a une bonne raison, on peut faire.
Bye
Bonsoir,
Une autre approche....
Il faut bien évidemment que l'onglet "Export" existe, et que les titres des colonnes soient précisées.
Bonne soirée
Sub Export()
Dim ShOrig As Worksheet, ShDest As Worksheet
Dim Base As Range
Set ShOrig = Sheets("BASE")
Set ShDest = Sheets("EXPORT")
ShDest.Range("A2:K1000").Clear
With ShOrig
Set Base = .Range("A2:O" & .Cells(Rows.Count, 1).End(xlUp).Row)
.Range("Q3").FormulaR1C1 = "=UPPER(RC[-4])=""N"""
Base.AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=.Range("Q2:Q3"), _
CopyToRange:=ShDest.Range("A1:K1"), Unique:=False
.Range("Q3").Clear
End With
End SubBonsoir à tous
merci pour votre aide.
Dans mon dernier message, J'ai écrit "colonne des titres" mais je voulais dire "la ligne des titres"
en effet dans cette ligne de titres, je souhaite garder le quadrillage.
merci
Robert
ps: pouvez vous me mettre des commentaires en vert dans vos codes afin que je comprenne ce qui se passe?
Bonsoir
je recherchais le même type de copier/coller.
Je l'ai adaptée, et ça fonctionne bie n
merci pour cette réponse
Michel