Bonjour,
Je ne sais pas si je m'y prends bien pour formuler ma demande et reprendre ce fil ?
Débutant en VBA, je bute sur une macro pour renommer des onglets.
Voici ma problématique :
- Les noms des onglets sont stockés dans la colonne B, de la feuille "Récapitulatif", (cellules B5 à B74, dont certaines peuvent être vides et par conséquent, l'onglet n'existe pas si une cellule est vide).
- Les noms des cellules peuvent-être alphanumérique ou numérique
- On renomme à partir du 4ème onglet vers la gauche
Et voic ce que j'ai écrit et qui ne fonctionne pas :
Sub Renom_feuille()
Set i = Range("B5:B74")
For i = 4 To Sheets.Count
Sheets(i).Name = Left([B:B].Cells(i), 31)
Next i
End Sub
Quelqu'un peut-il m'aider, SVP. pour compléter et corriger cette macro ?
Merci d'avance.