Récupérer le nom d'une feuille inputbox [Résolu]
A voir également:
- Récupérer le nom d'une feuille inputbox
- Récupérer le nom d'une feuille excel ✓ - Forum - Excel
- Récuperation du nom d'une feuille -> cellu ✓ - Forum - Bureautique
- Récupérer un nom dans une liste d'une autre feuille ✓ - Forum - Excel
- Récupérer un nom dans une liste d'une autre feuille ✓ - Forum - Programmation
- InputBox pour renommer le nom d'une feuille ✓ - Forum - VB / VBA
3 réponses
yg_be
- Messages postés
- 13785
- Date d'inscription
- lundi 9 juin 2008
- Statut
- Contributeur
- Dernière intervention
- 5 janvier 2021
bonjour,
peut-être:
peut-être:
option explicit ' ... dim Deletedata as string, onglet as worksheet DeleteData = InputBox("Sélectionnez une feuille Valeur Min", "ValeurMin") set onglet = Sheets(DeleteData) onglet.[a1]="ceci est l'onglet "+onglet.name
pijaku
- Messages postés
- 12234
- Date d'inscription
- jeudi 15 mai 2008
- Statut
- Modérateur
- Dernière intervention
- 4 janvier 2021
Bonjour,
Voici :
Voici :
Option Explicit Sub Essai() Dim iVar As Variant, MaFeuille As Worksheet iVar = InputBox("Saisir le nom de la feuille Valeur Min", "ValeurMin") If StrPtr(iVar) = 0 Then MsgBox "Vous avez annulé", vbCritical + vbOKOnly, "Annulation utilisateur" ElseIf iVar = vbNullString Then MsgBox "Aucune saisie", vbCritical + vbOKOnly, "Pas de saisie utilisateur" Else Set MaFeuille = getSheetByName(CStr(iVar), ThisWorkbook) If Not MaFeuille Is Nothing Then MsgBox MaFeuille.Name End If End If End Sub Function getSheetByName(Name As String, Optional Wb As Workbook) As Object 'Pierre Fauconnier 'https://www.developpez.net/forums/blogs/27262-pierre-fauconnier/b8231/vba-excel-verifier-quune-feuille-existe-classeur-trouver-feuille-nom-classeur/ Dim sh As Object, Counter As Long If Wb Is Nothing Then Set Wb = ActiveWorkbook Counter = 1 Do While Counter <= Wb.Sheets.Count And getSheetByName Is Nothing If StrComp(Wb.Sheets(Counter).Name, Name, vbTextCompare) = 0 Then Set getSheetByName = Wb.Sheets(Counter) Counter = Counter + 1 Loop End Function