Cellule commence par

[Berg1664]

Bonjour,

Qui pourrait me dire comment écrire en basic
"si la cellule commence par" en fait je voudrais automatiser un filtre pour qu'il fasse apparaître toutes les cellules d'une colonne commençant par les carcarère que j'aurai saisi dans une cellule (A1 par exemple)?

D'avance merci à vous

 

[joss56]

Re : Cellule commence par

slt,

en basic:
if left(tacellulederéference,1)=range("A1") then

tes instructions...

end if

 

[Pierrot93]

Re : Cellule commence par

Bonjour Berg

regarde le code ci dessous :

    Selection.AutoFilter Field:=1, Criteria1:="=" & Range("A1").Value & "*"

bonne journée
@+

 

[Berg1664]

Re : Cellule commence par

Super , merci beaucoup
à vous deux

 

[Berg1664]

Re : Cellule commence par

Bonsoir,

En fait en utilisant la ligne proposée,

Selection.AutoFilter Field:=1, Criteria1:="=" & range("A1").Value & "*"

J'ai un message d'erreur :"compilation, nombre d'arguments incorrects ou affectation de propriété incorrecte" avec range sur fond noir...

Merci de votre aide
A bientôt

 

[Pierrot93]

Re : Cellule commence par

Bonjour Berg, Joss

comprends pas trop, chez moi ce code fonctionne...

Attention, il faut que la cellule selectionnée soit sur une des cellules de la ligne de titre, sinon spécifies la première cellule sur laquelle doit être placée le filtre.

Range("F1").AutoFilter Field:=1, Criteria1:="=" & Range("A1").Value & "*"

Mets peut être ton fichier en pièce jointe (sans données confidentielles) ou un exemple reproduisant le cas.

bonne journée
@+

 

[Berg1664]

Re : Cellule commence par

Bonjour à vous

J'aimerais saisir début de la date en A1 :exemple "19" et obtenir toutes les dates commençant par 19

Voir pièce jointe

Merci A+

 

[Berg1664]

Re : Cellule commence par

Bonjour

Pierrot (or somebody ) peux tu faire fonctionner le fichier joint avec ta solution et me le renvoyer, moi je n'y parviens pas ?

merci
Amicalement

 

[Banzai64]

Re : Cellule commence par

Bonjour

Connaissant très peu les filtres

 

[Berg1664]

Re : Cellule commence par

Bonjour,

Merci pour cette réponse mais j'ai pris des dates pour l'exemple si par exemple c'était du texte, des nom de pays par exemple,comment faire pour que : en saisissant IR le filtre fasse apparaitre les pays commençant pat IR (IRAK et IRAN)

D'avance merci

 

[Banzai64]

Re : Cellule commence par

Bonjour

Utilises la formule de Pierrot93

Range("F1").AutoFilter Field:=1, Criteria1:="=" & Range("A1").Value & "*"