Résolu Problème de déclarations de variables

  • Auteur de la discussion fopy12
  • Date de début

fopy12

Habitué
Salut le forum :hello:
J'ai un petit soucis.
Dans un module, j'ai ça :
Code:
Sub CreerNvoClasseur()
    Public NouveauWk As Workbook
    Set NouveauWk = Workbooks.Add
    With NouveauWk
        .SaveAs Filename:="chemin\monfichier"
    End With
End Sub

Dans un autre module, je veux utiliser le "NouveauWk", mais ça ne marche pas!!
J'ai écris ceci :
Code:
NouveauWk.Worksheets(1).Cells(1, 1).Value = "dhguhqhdsgho"
c 'est quoi qui ne va pas ? merci d'avance de votre aide
 

zeb

Modérateur
Salut,

D'abord, tu vas lire l'aide d'Excel.
On en discute après, si tant est que tu n'y auras pas trouvé la solution.
 

fopy12

Habitué
j'y suis déjà allé, mais j'ai pas pu avancer c'est pour cela que je demande de l'aide ici.
tout ce que j'ai compris avec l'aide de vb, c'est qu'il faut utilser public si on veut que la déclaration soit prise en compte dans tous les modules du projet. Et on utilise DIM si on veut que ça soit dans un seul et unique procédure. voilà en gros ce que j'ai pu en tirer.
 

zeb

Modérateur
Alors j'ai l'aide de Public, instruction sous les yeux.
Première phrase, 4-ème et 5-ème mots...
 

fopy12

Habitué
Meilleure réponse
salut zeb ,
j'ai trouvé merci :D
voilà le petit corrigé

Code:
Public NouveauWk As Workbook
Sub CreerNvoClasseur()
    Set NouveauWk = Workbooks.Add
    With NouveauWk
        .SaveAs Filename:="chemin\monfichier"
    End With
End Sub

Dans un autre module, ecrire ceci :
Code:
NouveauWk.Worksheets(1).Cells(1, 1).Value = "dhguhqhdsgho"
 

zeb

Modérateur
Et en plus, tu gagnes les points de la meilleure réponse.

La prochaine fois que la réponse se trouve dans l'aide, à la première ligne, je te balance un RTFM! pour toute soluce :o

:lol:
 
Vous devez vous inscrire ou vous connecter pour répondre ici.
Derniers messages publiés
Statistiques globales
Discussions
730 098
Messages
6 717 055
Membres
1 586 282
Dernier membre
Yannick3553
Partager cette page
Haut