Willow05
Messages postés36Date d'inscriptionmercredi 11 juin 2003StatutMembreDernière intervention27 juin 2003
-
23 juin 2003 à 13:26
haykoula1984
Messages postés5Date d'inscriptionsamedi 30 juillet 2011StatutMembreDernière intervention19 septembre 2011
-
19 sept. 2011 à 13:15
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
haykoula1984
Messages postés5Date d'inscriptionsamedi 30 juillet 2011StatutMembreDernière intervention19 septembre 2011 19 sept. 2011 à 13:15
salut,
je veux qu'à partir d'un bouton de commande sur user form de créer un dossier (six_sigma) et dans ce dossier je veux créer et ouvrir un nouveau classeur excel (sélection) accessible en lecture et écriture
J'ai écrit ce code mais il n'a pas marché :
Private Sub CommandButton1_Click()
Dim sélection As Workbook
Dim six_sigma As String
six_sigma = ("C:\Documents and Settings\methodes\Bureau")
Set sélection = Workbooks.Open(six_sigma)
Workbooks("feuil1.xls").Activate
End sub
Willow05
Messages postés36Date d'inscriptionmercredi 11 juin 2003StatutMembreDernière intervention27 juin 2003 23 juin 2003 à 13:26
19 sept. 2011 à 13:15
je veux qu'à partir d'un bouton de commande sur user form de créer un dossier (six_sigma) et dans ce dossier je veux créer et ouvrir un nouveau classeur excel (sélection) accessible en lecture et écriture
J'ai écrit ce code mais il n'a pas marché :
Private Sub CommandButton1_Click()
Dim sélection As Workbook
Dim six_sigma As String
six_sigma = ("C:\Documents and Settings\methodes\Bureau")
Set sélection = Workbooks.Open(six_sigma)
Workbooks("feuil1.xls").Activate
End sub
23 juin 2003 à 13:26