Retrouver un ongler

Résolu/Fermé
Eddy291182 Messages postés 16 Date d'inscription mardi 6 juin 2017 Statut Membre Dernière intervention 21 juin 2017 - 15 juin 2017 à 16:18
Eddy291182 Messages postés 16 Date d'inscription mardi 6 juin 2017 Statut Membre Dernière intervention 21 juin 2017 - 21 juin 2017 à 17:51
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


1 réponse

jordane45 Messages postés 38138 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 17 avril 2024 4 649
15 juin 2017 à 16:34
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 


0
Eddy291182 Messages postés 16 Date d'inscription mardi 6 juin 2017 Statut Membre Dernière intervention 21 juin 2017
15 juin 2017 à 18:06
Désoler j'ai essaye plusieurs fois mais cela ne fonctionne pas que faire merci
0
Eddy291182 Messages postés 16 Date d'inscription mardi 6 juin 2017 Statut Membre Dernière intervention 21 juin 2017
15 juin 2017 à 18:12
Voici mon classeur avec la macro que je voudrais pour que cela fonctionne
Voici mon classeur les clients sont effacer pour leurs sécurité merci pour votre compréhension
https://mon-partage.fr/f/WbYjvoBI/
0
Dany > Eddy291182 Messages postés 16 Date d'inscription mardi 6 juin 2017 Statut Membre Dernière intervention 21 juin 2017
16 juin 2017 à 05:38
Ton fichier corrigé : https://mon-partage.fr/f/yxnWlgCS/
0
Eddy291182 Messages postés 16 Date d'inscription mardi 6 juin 2017 Statut Membre Dernière intervention 21 juin 2017 > Dany
16 juin 2017 à 07:40
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.
0
Eddy291182 Messages postés 16 Date d'inscription mardi 6 juin 2017 Statut Membre Dernière intervention 21 juin 2017 > Eddy291182 Messages postés 16 Date d'inscription mardi 6 juin 2017 Statut Membre Dernière intervention 21 juin 2017
20 juin 2017 à 10:13
Je suis toujours en attend d'aide j'ai réussi quelque manipulation mais je suis toujours bloque pour cette recherche merci de votre aide.
0