Bonjour à toutes/tous.
Dans une macro, je crée une nouvelle feuille.
Y'a-t-il une boite de dialogue genre "rename thumbnail" à appeler dans cette
macro pour obliger l'utilisateur à donner un nom immédiatement à cette
feuille nouvelle et quelle en est la syntaxe ?
Merci d'avance.
JRC
Bonjour à toutes/tous.
Dans une macro, je crée une nouvelle feuille.
Y'a-t-il une boite de dialogue genre "rename thumbnail" à appeler dans cette
macro pour obliger l'utilisateur à donner un nom immédiatement à cette
feuille nouvelle et quelle en est la syntaxe ?
Merci d'avance.
JRC
Bonjour à toutes/tous.
Dans une macro, je crée une nouvelle feuille.
Y'a-t-il une boite de dialogue genre "rename thumbnail" à appeler dans cette
macro pour obliger l'utilisateur à donner un nom immédiatement à cette
feuille nouvelle et quelle en est la syntaxe ?
Merci d'avance.
JRC
Bonjour à toutes/tous.
Dans une macro, je crée une nouvelle feuille.
Y'a-t-il une boite de dialogue genre "rename thumbnail" à appeler dans
cette
macro pour obliger l'utilisateur à donner un nom immédiatement à cette
feuille nouvelle et quelle en est la syntaxe ?
Merci d'avance.
JRC
Bonjour à toutes/tous.
Dans une macro, je crée une nouvelle feuille.
Y'a-t-il une boite de dialogue genre "rename thumbnail" à appeler dans
cette
macro pour obliger l'utilisateur à donner un nom immédiatement à cette
feuille nouvelle et quelle en est la syntaxe ?
Merci d'avance.
JRC
Bonjour à toutes/tous.
Dans une macro, je crée une nouvelle feuille.
Y'a-t-il une boite de dialogue genre "rename thumbnail" à appeler dans
cette
macro pour obliger l'utilisateur à donner un nom immédiatement à cette
feuille nouvelle et quelle en est la syntaxe ?
Merci d'avance.
JRC
Bonsoir,
Ceci te convient-il ?
Sub Essai()
Sheets.Add
ActiveSheet.Name = Application.InputBox(Prompt:="Écrire le nouveau nom", _
Title:="Nommer une feuille", Type:=2)
End Sub
Serge
"JRC-QSA" a écrit dans le message de news:Bonjour à toutes/tous.
Dans une macro, je crée une nouvelle feuille.
Y'a-t-il une boite de dialogue genre "rename thumbnail" à appeler dans cette
macro pour obliger l'utilisateur à donner un nom immédiatement à cette
feuille nouvelle et quelle en est la syntaxe ?
Merci d'avance.
JRC
Bonsoir,
Ceci te convient-il ?
Sub Essai()
Sheets.Add
ActiveSheet.Name = Application.InputBox(Prompt:="Écrire le nouveau nom", _
Title:="Nommer une feuille", Type:=2)
End Sub
Serge
"JRC-QSA" <JRCQSA@discussions.microsoft.com> a écrit dans le message de news:
0024A277-EE9E-4B46-88A6-4887E48A899E@microsoft.com...
Bonjour à toutes/tous.
Dans une macro, je crée une nouvelle feuille.
Y'a-t-il une boite de dialogue genre "rename thumbnail" à appeler dans cette
macro pour obliger l'utilisateur à donner un nom immédiatement à cette
feuille nouvelle et quelle en est la syntaxe ?
Merci d'avance.
JRC
Bonsoir,
Ceci te convient-il ?
Sub Essai()
Sheets.Add
ActiveSheet.Name = Application.InputBox(Prompt:="Écrire le nouveau nom", _
Title:="Nommer une feuille", Type:=2)
End Sub
Serge
"JRC-QSA" a écrit dans le message de news:Bonjour à toutes/tous.
Dans une macro, je crée une nouvelle feuille.
Y'a-t-il une boite de dialogue genre "rename thumbnail" à appeler dans cette
macro pour obliger l'utilisateur à donner un nom immédiatement à cette
feuille nouvelle et quelle en est la syntaxe ?
Merci d'avance.
JRC
Bonsoir,
Ceci te convient-il ?
Sub Essai()
Sheets.Add
ActiveSheet.Name = Application.InputBox(Prompt:="Écrire le nouveau
nom", _
Title:="Nommer une feuille", Type:=2)
End Sub
Serge
"JRC-QSA" a écrit dans le message de
news:Bonjour à toutes/tous.
Dans une macro, je crée une nouvelle feuille.
Y'a-t-il une boite de dialogue genre "rename thumbnail" à appeler dans
cette
macro pour obliger l'utilisateur à donner un nom immédiatement à cette
feuille nouvelle et quelle en est la syntaxe ?
Merci d'avance.
JRC
Bonsoir,
Ceci te convient-il ?
Sub Essai()
Sheets.Add
ActiveSheet.Name = Application.InputBox(Prompt:="Écrire le nouveau
nom", _
Title:="Nommer une feuille", Type:=2)
End Sub
Serge
"JRC-QSA" <JRCQSA@discussions.microsoft.com> a écrit dans le message de
news:
0024A277-EE9E-4B46-88A6-4887E48A899E@microsoft.com...
Bonjour à toutes/tous.
Dans une macro, je crée une nouvelle feuille.
Y'a-t-il une boite de dialogue genre "rename thumbnail" à appeler dans
cette
macro pour obliger l'utilisateur à donner un nom immédiatement à cette
feuille nouvelle et quelle en est la syntaxe ?
Merci d'avance.
JRC
Bonsoir,
Ceci te convient-il ?
Sub Essai()
Sheets.Add
ActiveSheet.Name = Application.InputBox(Prompt:="Écrire le nouveau
nom", _
Title:="Nommer une feuille", Type:=2)
End Sub
Serge
"JRC-QSA" a écrit dans le message de
news:Bonjour à toutes/tous.
Dans une macro, je crée une nouvelle feuille.
Y'a-t-il une boite de dialogue genre "rename thumbnail" à appeler dans
cette
macro pour obliger l'utilisateur à donner un nom immédiatement à cette
feuille nouvelle et quelle en est la syntaxe ?
Merci d'avance.
JRC
Bonsoir,
Ceci te convient-il ?
Sub Essai()
Sheets.Add
ActiveSheet.Name = Application.InputBox(Prompt:="Écrire le nouveau
nom", _
Title:="Nommer une feuille", Type:=2)
End Sub
Serge
"JRC-QSA" a écrit dans le message de
news:Bonjour à toutes/tous.
Dans une macro, je crée une nouvelle feuille.
Y'a-t-il une boite de dialogue genre "rename thumbnail" à appeler dans
cette
macro pour obliger l'utilisateur à donner un nom immédiatement à cette
feuille nouvelle et quelle en est la syntaxe ?
Merci d'avance.
JRC
Bonsoir,
Ceci te convient-il ?
Sub Essai()
Sheets.Add
ActiveSheet.Name = Application.InputBox(Prompt:="Écrire le nouveau
nom", _
Title:="Nommer une feuille", Type:=2)
End Sub
Serge
"JRC-QSA" <JRCQSA@discussions.microsoft.com> a écrit dans le message de
news:
0024A277-EE9E-4B46-88A6-4887E48A899E@microsoft.com...
Bonjour à toutes/tous.
Dans une macro, je crée une nouvelle feuille.
Y'a-t-il une boite de dialogue genre "rename thumbnail" à appeler dans
cette
macro pour obliger l'utilisateur à donner un nom immédiatement à cette
feuille nouvelle et quelle en est la syntaxe ?
Merci d'avance.
JRC
Bonsoir,
Ceci te convient-il ?
Sub Essai()
Sheets.Add
ActiveSheet.Name = Application.InputBox(Prompt:="Écrire le nouveau
nom", _
Title:="Nommer une feuille", Type:=2)
End Sub
Serge
"JRC-QSA" a écrit dans le message de
news:Bonjour à toutes/tous.
Dans une macro, je crée une nouvelle feuille.
Y'a-t-il une boite de dialogue genre "rename thumbnail" à appeler dans
cette
macro pour obliger l'utilisateur à donner un nom immédiatement à cette
feuille nouvelle et quelle en est la syntaxe ?
Merci d'avance.
JRC
ET j'oubliais :
Si tu utilisais : Type:=3 le nom de la feuille pourrait
être sois une chaîne numérique ou alphanumérique.
"garnote" a écrit dans le message de news:
Tentative pour rendre la chose plus souple.
Mais je me méfie, michdenis est dans les parages ;-)
Sub Essai()
Sheets.Add
10:
nom = Application.InputBox(Prompt:="Écrire le nouveau nom", _
Title:="Nommer une feuille", Type:=2)
If nom = False Or nom = "" Then Exit Sub
For Each F In ThisWorkbook.Worksheets
If F.Name = nom Then
rep = MsgBox("Le nom " & nom & " existe déjà.
Voulez-vous entrer un autre nom ?", vbYesNo)
If rep = vbYes Then
GoTo 10
Else
Exit Sub
End If
End If
Next F
ActiveSheet.Name = nom
End Sub
Serge
"garnote" a écrit dans le message de news:Bonsoir,
Ceci te convient-il ?
Sub Essai()
Sheets.Add
ActiveSheet.Name = Application.InputBox(Prompt:="Écrire le nouveau
nom", _
Title:="Nommer une feuille", Type:=2)
End Sub
Serge
"JRC-QSA" a écrit dans le message de
news:Bonjour à toutes/tous.
Dans une macro, je crée une nouvelle feuille.
Y'a-t-il une boite de dialogue genre "rename thumbnail" à appeler dans
cette
macro pour obliger l'utilisateur à donner un nom immédiatement à cette
feuille nouvelle et quelle en est la syntaxe ?
Merci d'avance.
JRC
ET j'oubliais :
Si tu utilisais : Type:=3 le nom de la feuille pourrait
être sois une chaîne numérique ou alphanumérique.
"garnote" <garnote3RIEN@videotron.ca> a écrit dans le message de news:
O7lEvp7LJHA.6000@TK2MSFTNGP04.phx.gbl...
Tentative pour rendre la chose plus souple.
Mais je me méfie, michdenis est dans les parages ;-)
Sub Essai()
Sheets.Add
10:
nom = Application.InputBox(Prompt:="Écrire le nouveau nom", _
Title:="Nommer une feuille", Type:=2)
If nom = False Or nom = "" Then Exit Sub
For Each F In ThisWorkbook.Worksheets
If F.Name = nom Then
rep = MsgBox("Le nom " & nom & " existe déjà.
Voulez-vous entrer un autre nom ?", vbYesNo)
If rep = vbYes Then
GoTo 10
Else
Exit Sub
End If
End If
Next F
ActiveSheet.Name = nom
End Sub
Serge
"garnote" <garnote3RIEN@videotron.ca> a écrit dans le message de news:
OCH5JM7LJHA.1736@TK2MSFTNGP03.phx.gbl...
Bonsoir,
Ceci te convient-il ?
Sub Essai()
Sheets.Add
ActiveSheet.Name = Application.InputBox(Prompt:="Écrire le nouveau
nom", _
Title:="Nommer une feuille", Type:=2)
End Sub
Serge
"JRC-QSA" <JRCQSA@discussions.microsoft.com> a écrit dans le message de
news:
0024A277-EE9E-4B46-88A6-4887E48A899E@microsoft.com...
Bonjour à toutes/tous.
Dans une macro, je crée une nouvelle feuille.
Y'a-t-il une boite de dialogue genre "rename thumbnail" à appeler dans
cette
macro pour obliger l'utilisateur à donner un nom immédiatement à cette
feuille nouvelle et quelle en est la syntaxe ?
Merci d'avance.
JRC
ET j'oubliais :
Si tu utilisais : Type:=3 le nom de la feuille pourrait
être sois une chaîne numérique ou alphanumérique.
"garnote" a écrit dans le message de news:
Tentative pour rendre la chose plus souple.
Mais je me méfie, michdenis est dans les parages ;-)
Sub Essai()
Sheets.Add
10:
nom = Application.InputBox(Prompt:="Écrire le nouveau nom", _
Title:="Nommer une feuille", Type:=2)
If nom = False Or nom = "" Then Exit Sub
For Each F In ThisWorkbook.Worksheets
If F.Name = nom Then
rep = MsgBox("Le nom " & nom & " existe déjà.
Voulez-vous entrer un autre nom ?", vbYesNo)
If rep = vbYes Then
GoTo 10
Else
Exit Sub
End If
End If
Next F
ActiveSheet.Name = nom
End Sub
Serge
"garnote" a écrit dans le message de news:Bonsoir,
Ceci te convient-il ?
Sub Essai()
Sheets.Add
ActiveSheet.Name = Application.InputBox(Prompt:="Écrire le nouveau
nom", _
Title:="Nommer une feuille", Type:=2)
End Sub
Serge
"JRC-QSA" a écrit dans le message de
news:Bonjour à toutes/tous.
Dans une macro, je crée une nouvelle feuille.
Y'a-t-il une boite de dialogue genre "rename thumbnail" à appeler dans
cette
macro pour obliger l'utilisateur à donner un nom immédiatement à cette
feuille nouvelle et quelle en est la syntaxe ?
Merci d'avance.
JRC
Prévoir toutes les erreurs possibles avec des
messages personnalisés et sans GoTo (ouach).
Personnellement, je ne suis pas sorti de l'auberge !
Je vais me contenter de retourner à mes divagations
mathématiques ;-)
Serge
"michdenis" a écrit dans le message de news:ET j'oubliais :
Si tu utilisais : Type:=3 le nom de la feuille pourrait
être sois une chaîne numérique ou alphanumérique.
"garnote" a écrit dans le message de news:
Tentative pour rendre la chose plus souple.
Mais je me méfie, michdenis est dans les parages ;-)
Sub Essai()
Sheets.Add
10:
nom = Application.InputBox(Prompt:="Écrire le nouveau nom", _
Title:="Nommer une feuille", Type:=2)
If nom = False Or nom = "" Then Exit Sub
For Each F In ThisWorkbook.Worksheets
If F.Name = nom Then
rep = MsgBox("Le nom " & nom & " existe déjà.
Voulez-vous entrer un autre nom ?", vbYesNo)
If rep = vbYes Then
GoTo 10
Else
Exit Sub
End If
End If
Next F
ActiveSheet.Name = nom
End Sub
Serge
"garnote" a écrit dans le message de news:Bonsoir,
Ceci te convient-il ?
Sub Essai()
Sheets.Add
ActiveSheet.Name = Application.InputBox(Prompt:="Écrire le nouveau
nom", _
Title:="Nommer une feuille", Type:=2)
End Sub
Serge
"JRC-QSA" a écrit dans le message de
news:Bonjour à toutes/tous.
Dans une macro, je crée une nouvelle feuille.
Y'a-t-il une boite de dialogue genre "rename thumbnail" à appeler dans
cette
macro pour obliger l'utilisateur à donner un nom immédiatement à cette
feuille nouvelle et quelle en est la syntaxe ?
Merci d'avance.
JRC
Prévoir toutes les erreurs possibles avec des
messages personnalisés et sans GoTo (ouach).
Personnellement, je ne suis pas sorti de l'auberge !
Je vais me contenter de retourner à mes divagations
mathématiques ;-)
Serge
"michdenis" <michdenis@hotmail.com> a écrit dans le message de news:
uAKBFM8LJHA.5176@TK2MSFTNGP04.phx.gbl...
ET j'oubliais :
Si tu utilisais : Type:=3 le nom de la feuille pourrait
être sois une chaîne numérique ou alphanumérique.
"garnote" <garnote3RIEN@videotron.ca> a écrit dans le message de news:
O7lEvp7LJHA.6000@TK2MSFTNGP04.phx.gbl...
Tentative pour rendre la chose plus souple.
Mais je me méfie, michdenis est dans les parages ;-)
Sub Essai()
Sheets.Add
10:
nom = Application.InputBox(Prompt:="Écrire le nouveau nom", _
Title:="Nommer une feuille", Type:=2)
If nom = False Or nom = "" Then Exit Sub
For Each F In ThisWorkbook.Worksheets
If F.Name = nom Then
rep = MsgBox("Le nom " & nom & " existe déjà.
Voulez-vous entrer un autre nom ?", vbYesNo)
If rep = vbYes Then
GoTo 10
Else
Exit Sub
End If
End If
Next F
ActiveSheet.Name = nom
End Sub
Serge
"garnote" <garnote3RIEN@videotron.ca> a écrit dans le message de news:
OCH5JM7LJHA.1736@TK2MSFTNGP03.phx.gbl...
Bonsoir,
Ceci te convient-il ?
Sub Essai()
Sheets.Add
ActiveSheet.Name = Application.InputBox(Prompt:="Écrire le nouveau
nom", _
Title:="Nommer une feuille", Type:=2)
End Sub
Serge
"JRC-QSA" <JRCQSA@discussions.microsoft.com> a écrit dans le message de
news:
0024A277-EE9E-4B46-88A6-4887E48A899E@microsoft.com...
Bonjour à toutes/tous.
Dans une macro, je crée une nouvelle feuille.
Y'a-t-il une boite de dialogue genre "rename thumbnail" à appeler dans
cette
macro pour obliger l'utilisateur à donner un nom immédiatement à cette
feuille nouvelle et quelle en est la syntaxe ?
Merci d'avance.
JRC
Prévoir toutes les erreurs possibles avec des
messages personnalisés et sans GoTo (ouach).
Personnellement, je ne suis pas sorti de l'auberge !
Je vais me contenter de retourner à mes divagations
mathématiques ;-)
Serge
"michdenis" a écrit dans le message de news:ET j'oubliais :
Si tu utilisais : Type:=3 le nom de la feuille pourrait
être sois une chaîne numérique ou alphanumérique.
"garnote" a écrit dans le message de news:
Tentative pour rendre la chose plus souple.
Mais je me méfie, michdenis est dans les parages ;-)
Sub Essai()
Sheets.Add
10:
nom = Application.InputBox(Prompt:="Écrire le nouveau nom", _
Title:="Nommer une feuille", Type:=2)
If nom = False Or nom = "" Then Exit Sub
For Each F In ThisWorkbook.Worksheets
If F.Name = nom Then
rep = MsgBox("Le nom " & nom & " existe déjà.
Voulez-vous entrer un autre nom ?", vbYesNo)
If rep = vbYes Then
GoTo 10
Else
Exit Sub
End If
End If
Next F
ActiveSheet.Name = nom
End Sub
Serge
"garnote" a écrit dans le message de news:Bonsoir,
Ceci te convient-il ?
Sub Essai()
Sheets.Add
ActiveSheet.Name = Application.InputBox(Prompt:="Écrire le nouveau
nom", _
Title:="Nommer une feuille", Type:=2)
End Sub
Serge
"JRC-QSA" a écrit dans le message de
news:Bonjour à toutes/tous.
Dans une macro, je crée une nouvelle feuille.
Y'a-t-il une boite de dialogue genre "rename thumbnail" à appeler dans
cette
macro pour obliger l'utilisateur à donner un nom immédiatement à cette
feuille nouvelle et quelle en est la syntaxe ?
Merci d'avance.
JRC
Bonjour à toutes/tous.
Dans une macro, je crée une nouvelle feuille.
Y'a-t-il une boite de dialogue genre "rename thumbnail" à appeler dans cette
macro pour obliger l'utilisateur à donner un nom immédiatement à cette
feuille nouvelle et quelle en est la syntaxe ?
Merci d'avance.
JRC
Bonjour à toutes/tous.
Dans une macro, je crée une nouvelle feuille.
Y'a-t-il une boite de dialogue genre "rename thumbnail" à appeler dans cette
macro pour obliger l'utilisateur à donner un nom immédiatement à cette
feuille nouvelle et quelle en est la syntaxe ?
Merci d'avance.
JRC
Bonjour à toutes/tous.
Dans une macro, je crée une nouvelle feuille.
Y'a-t-il une boite de dialogue genre "rename thumbnail" à appeler dans cette
macro pour obliger l'utilisateur à donner un nom immédiatement à cette
feuille nouvelle et quelle en est la syntaxe ?
Merci d'avance.
JRC
... et quelle en est la syntaxe ?
Bonjour,
Au début de ta macro une variable pour stocker le nom
un inputbox peut faire l'affaire
tant qu'il n'a pas donné un nom valide tu ne crée pas la feuille.
@+
--
lSteph
JRC-QSA a écrit :Bonjour à toutes/tous.
Dans une macro, je crée une nouvelle feuille.
Y'a-t-il une boite de dialogue genre "rename thumbnail" à appeler dans
cette macro pour obliger l'utilisateur à donner un nom immédiatement à
cette feuille nouvelle et quelle en est la syntaxe ?
Merci d'avance.
JRC
... et quelle en est la syntaxe ?
Bonjour,
Au début de ta macro une variable pour stocker le nom
un inputbox peut faire l'affaire
tant qu'il n'a pas donné un nom valide tu ne crée pas la feuille.
@+
--
lSteph
JRC-QSA a écrit :
Bonjour à toutes/tous.
Dans une macro, je crée une nouvelle feuille.
Y'a-t-il une boite de dialogue genre "rename thumbnail" à appeler dans
cette macro pour obliger l'utilisateur à donner un nom immédiatement à
cette feuille nouvelle et quelle en est la syntaxe ?
Merci d'avance.
JRC
... et quelle en est la syntaxe ?
Bonjour,
Au début de ta macro une variable pour stocker le nom
un inputbox peut faire l'affaire
tant qu'il n'a pas donné un nom valide tu ne crée pas la feuille.
@+
--
lSteph
JRC-QSA a écrit :Bonjour à toutes/tous.
Dans une macro, je crée une nouvelle feuille.
Y'a-t-il une boite de dialogue genre "rename thumbnail" à appeler dans
cette macro pour obliger l'utilisateur à donner un nom immédiatement à
cette feuille nouvelle et quelle en est la syntaxe ?
Merci d'avance.
JRC
Bonjour,
Au début de ta macro une variable pour stocker le nom
un inputbox peut faire l'affaire
tant qu'il n'a pas donné un nom valide tu ne crée pas la feuille.
@+
--
lSteph
JRC-QSA a écrit :
> Bonjour à toutes/tous.
> Dans une macro, je crée une nouvelle feuille.
> Y'a-t-il une boite de dialogue genre "rename thumbnail" à appeler dans cette
> macro pour obliger l'utilisateur à donner un nom immédiatement à cette
> feuille nouvelle et quelle en est la syntaxe ?
> Merci d'avance.
> JRC
Bonjour,
Au début de ta macro une variable pour stocker le nom
un inputbox peut faire l'affaire
tant qu'il n'a pas donné un nom valide tu ne crée pas la feuille.
@+
--
lSteph
JRC-QSA a écrit :
> Bonjour à toutes/tous.
> Dans une macro, je crée une nouvelle feuille.
> Y'a-t-il une boite de dialogue genre "rename thumbnail" à appeler dans cette
> macro pour obliger l'utilisateur à donner un nom immédiatement à cette
> feuille nouvelle et quelle en est la syntaxe ?
> Merci d'avance.
> JRC
Bonjour,
Au début de ta macro une variable pour stocker le nom
un inputbox peut faire l'affaire
tant qu'il n'a pas donné un nom valide tu ne crée pas la feuille.
@+
--
lSteph
JRC-QSA a écrit :
> Bonjour à toutes/tous.
> Dans une macro, je crée une nouvelle feuille.
> Y'a-t-il une boite de dialogue genre "rename thumbnail" à appeler dans cette
> macro pour obliger l'utilisateur à donner un nom immédiatement à cette
> feuille nouvelle et quelle en est la syntaxe ?
> Merci d'avance.
> JRC