Tester si une feuille existe
- Initiateur de la discussion belette
- Date de début
AeroPlanneur
XLDnaute Junior
bonjour belette,
un exemple : (NewName à remplacer par le nom que tu veux donner à ta feuille)
Sub NwSheetCreate()
On Error GoTo NwSheet
Sheets('NewName').Select
Exit Sub
NwSheet:
Sheets.Add.Select
ActiveSheet.Name = 'NewName'
End Sub
un exemple : (NewName à remplacer par le nom que tu veux donner à ta feuille)
Sub NwSheetCreate()
On Error GoTo NwSheet
Sheets('NewName').Select
Exit Sub
NwSheet:
Sheets.Add.Select
ActiveSheet.Name = 'NewName'
End Sub
Ooups problème de passement d'argument !
Le nom de ma feuille est une variable : Énergie, j'appelle donc la fonction avec NwSheetCreate(Énergie) et je remplace 'NewName' par Énergie dans ton exemple mais ça ne marche pas (erreur compil : nombre d'argument incorrect ou affectation de propriété incorrecte !)
Le nom de ma feuille est une variable : Énergie, j'appelle donc la fonction avec NwSheetCreate(Énergie) et je remplace 'NewName' par Énergie dans ton exemple mais ça ne marche pas (erreur compil : nombre d'argument incorrect ou affectation de propriété incorrecte !)
AeroPlanneur
XLDnaute Junior
re belette,
j'ai transformé la macro. Pour l'appeler, tu lances AppelMacro
'*******************************
Sub NwSheetCreate(nom As String)
On Error GoTo NwSheet
Sheets(nom).Select
Exit Sub
NwSheet:
Sheets.Add.Select
ActiveSheet.Name = nom
End Sub
'*********************************
Sub AppelMacro()
NwSheetCreate ('Energie')
End Sub
Message édité par: AeroPlanneur, à: 05/05/2006 15:43
j'ai transformé la macro. Pour l'appeler, tu lances AppelMacro
'*******************************
Sub NwSheetCreate(nom As String)
On Error GoTo NwSheet
Sheets(nom).Select
Exit Sub
NwSheet:
Sheets.Add.Select
ActiveSheet.Name = nom
End Sub
'*********************************
Sub AppelMacro()
NwSheetCreate ('Energie')
End Sub
Message édité par: AeroPlanneur, à: 05/05/2006 15:43
AeroPlanneur écrit:
Sauf que dans ce cas, la nouvelle feuille s'apelle Energie alors que je veux qu'elle prenne le nom de l'énergie précedemment choisi et sotcké dans la variable Energie.
Sauf que dans ce cas, la nouvelle feuille s'apelle Energie alors que je veux qu'elle prenne le nom de l'énergie précedemment choisi et sotcké dans la variable Energie.
AeroPlanneur
XLDnaute Junior
re-re,
il suffit alors de retirer les parenthèses
Sub AppelMacro()
Energie = 'gaz'
NwSheetCreate (Energie)
End Sub
il suffit alors de retirer les parenthèses
Sub AppelMacro()
Energie = 'gaz'
NwSheetCreate (Energie)
End Sub
Guillemets et non parenthèses !
Mais ça ne change pas, le problème doit venir d'autre part, je cherche encore...
Mais ça ne change pas, le problème doit venir d'autre part, je cherche encore...
AeroPlanneur
XLDnaute Junior
est-ce que ta variable Energie est de type string ?
>Guillemets et non parenthèses !
Il y a 10 sortes de gens : ceux qui connaissent le code binaire et ceux qui confondent guillemets et parenthèses
>Guillemets et non parenthèses !
Il y a 10 sortes de gens : ceux qui connaissent le code binaire et ceux qui confondent guillemets et parenthèses
Le problème vient de la ComboBox où sont listés les types d'énergie, rien à voir avec ta fonction c'est bon ça marche !
Merci
Merci
