Retrouver un ongler
Résolu
Eddy291182
Messages postés
21
Statut
Membre
-
Eddy291182 Messages postés 21 Statut Membre -
Eddy291182 Messages postés 21 Statut Membre -
Bonjour,
Suite un soucis je voudrais savoir si il serais possible de trouver un onglet dans un classeur je m'explique j'ai un classeur Clients qui auras des centaine d'onglet ( un onglet = un Num Client ) je voudrais savoir si il serait possible de créer une macro ou autre qui me permettrais de retrouver un onglet précis je m'explique dans la premier feuille du classeur j'aurais un tableau identique a tout les autre je tape un numéro clients X et elle me retrouve ce clients et me mes sur cette onglet du numéro clients et de la je pourrais soit modifier des cellule ou de supprimer cette ongles en sachant que le classeur peu aussi avoir de nouveau onglet chaque jours donc quant je rechercherais l'onglet malgré les nouveau onglet qui ce métra.
J’espère que je me suis bien expliquer. Merci
Suite un soucis je voudrais savoir si il serais possible de trouver un onglet dans un classeur je m'explique j'ai un classeur Clients qui auras des centaine d'onglet ( un onglet = un Num Client ) je voudrais savoir si il serait possible de créer une macro ou autre qui me permettrais de retrouver un onglet précis je m'explique dans la premier feuille du classeur j'aurais un tableau identique a tout les autre je tape un numéro clients X et elle me retrouve ce clients et me mes sur cette onglet du numéro clients et de la je pourrais soit modifier des cellule ou de supprimer cette ongles en sachant que le classeur peu aussi avoir de nouveau onglet chaque jours donc quant je rechercherais l'onglet malgré les nouveau onglet qui ce métra.
J’espère que je me suis bien expliquer. Merci
1 réponse
-
Bonjour,
sub test() Dim nomOnglet as string nomOnglet = "toto" ' par exemple If FExist(nomOnglet) Then Sheets(nomOnglet).activate End if End Sub Function FExist(NomF As String) As Boolean ' test si la feuille existe Application.ScreenUpdating = False On Error Resume Next FExist = Not Sheets(NomF) Is Nothing Application.ScreenUpdating = True End Function
-
-
-
-
Bonjour merci de votre aide mais maintenant Dany rien ne fonction je m'explique tu ma fais une superbe macro d'on tout fonctionne très bien quant je crée un client X cela ce copie sur le classeur commande et sur le classeur fiches clients comme j'avais demander tu a fais un super travaille mais la maintenant plus rien fonctionne
Je m'explique je voudrais que quant je tape CTRL+MAJ+A mon Userform création client fonctionne et que quant je dois le rechercher dans mon classeur fiches clients après modification des cellule X son modifier en claire je voudrais si pour X raison je dois rechercher un Clients je tape CTRL+MAJ+Q cela m’envoie sur un nouveau Userform et de la en tapent son num clients je le retrouve et je reste dessus pour pouvoir modifie certaine cellule qui sera modifiable.
Je te met les deux fichier en espérant que je me suis bien expliquer.
Fichier "commande"
https://mon-partage.fr/f/nNgjxd03/
Fichier "Fiches clients"
https://mon-partage.fr/f/eQ0WgpN1/
Merci de votre aide et désoler pour tout je suis débutant dans le VB. -
-
