encore un sujet facile !!!

encore un sujet facile !!! - VB/VBA/VBS - Programmation

Marsh Posté le 04-05-2006 à 08:32:27    

je souhaite avoir une fonction dans mon code vba sur mon fichier Excel 2002 qui a l'ouverture du fichier Excel me lance un UserForm de 1
de 2 j'aimerai savoir comment faire pour au clic d'un bouton sur un userform, vider un champ de cellule au prealable defini avecv Insertion > Nom > Definir  
voila merci :)

Reply

Marsh Posté le 04-05-2006 à 08:32:27   

Reply

Marsh Posté le 04-05-2006 à 08:36:27    

Bonjour GillooZ
Bonjour à tous
 
1 - Essaie de mettre dans workbook.open : userform1.show
2 - range("maplage" ).value=""
 
Cela doit faire ce que tu veux
 
Cordialement

Reply

Marsh Posté le 04-05-2006 à 08:42:00    

ou puis je trouver workbook.open aussi plz ?

Reply

Marsh Posté le 04-05-2006 à 08:55:07    

Tu passes dans l'éditeur de code VBA par ALT+F11
Dans la fenêtre de gestion de projet (arborescence d'objets) tu trouveras VBAProject avec le nom de ton classeur Excel entre parenthèses.
Sous cette arborescence tu trouveras Microsoft Excel Objets et encore dessous les feuilles de calcul de ton classeur, puis l'objet ThisWorbook.
Tu double cliques dessus et à droite apparaîtra la fenêtre de code correspondante (sans doute vide si tu n'as rien codé).
La liste déroulante en haut à gauche te permet d'accéder à l'objet workbook; la liste déroulante en haut à droite de la fenêtre de code te permettra alors d'avoir accès aux événements de ton classeur (dont Open)
Ainsi cela va créer une fonction qui s'exécutera au lancement de ton classeur Excel.
Y a plus qu'à mettre du code dans la fonction.

Reply

Marsh Posté le 04-05-2006 à 08:56:17    

Re  
 
Dans VBA (alt F11), tu cliques sur l'cône "Explorateur de projet", à côté de "l'équerre" normalement.
Dans la fenêtre qui s'ouvre, il y a "thisworbook", tu cliques dessus
Dans la fenêtre qui s'ouvre, tu cliques sur "Général" et tu choisis "Workbook", et tu as la "Private Sub Worbook_open"  qui s'affiche
 
Bon courage
 
Cordialement
 

Reply

Marsh Posté le 04-05-2006 à 08:59:39    

merci beaucoup a tous, encore une grande progression dans mon apprentissage de vba sous excel ^^

Reply

Marsh Posté le 04-05-2006 à 09:43:15    

peut on tester si la plage est vide ?  
car en fait g mis la methode pour vider les plages mais si celles ci sont deja vide, le programme bug :/
Merci :)

Reply

Marsh Posté le 04-05-2006 à 09:46:22    

Essaie plutôt : range("maplage" ).Clear

Reply

Marsh Posté le 04-05-2006 à 09:49:59    

Re
 
tu mets avant :
 
On Error Resume Next
 
C'est vrai que "...clear" est préférable
 
Cordialement

Reply

Marsh Posté le 04-05-2006 à 09:51:30    

ca efface bien mais des que la plage est vide et que je re clear, un bug survient :/

Reply

Marsh Posté le 04-05-2006 à 09:51:30   

Reply

Marsh Posté le 04-05-2006 à 09:57:15    

ca marche merci bcp :)

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed