Créer et renommer plusieurs pages à partir de texte

Résolu/Fermé

Cécile - 28 nov. 2013 à 16:28
Cécile - 28 nov. 2013 à 16:59

Bonjour,

Je souhaite créer plusieurs pages et les renommer .
Par exemple je veux que la 1ère page soit nommée "Folio1", la seconde "Folio2" , etc.

Est-ce qu'il est plus simple de créer une boucle ou de faire appel à des cellules d'une autre page qui contiennent les futures noms de mes pages ?

Je sais que pour créer ma 1ère page je dois coder:

'Créer 1ére page

Add.Sheet

et je ne me souviens plus comment faire pour la suite.

A voir également:

Créer et renommer plusieurs pages à partir de texte
Creer un groupe whatsapp a partir d'un autre groupe - Guide
Créer un compte gmail - Guide
Renommer plusieurs fichiers - Guide
Créer un compte google - Guide
Créer un compte instagram - Guide

3 réponses

Réponse 1 / 3

Cécile
28 nov. 2013 à 16:42

Qu'est-ce que "Byte" exactement

pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 743
28 nov. 2013 à 16:48

Byte est une type de variable. Il est utilisé pour stocker un nombre compris entre 0 et 255 (de mémoire...)

Cécile
28 nov. 2013 à 16:50

Existe-t-il une alternative à "Byte"?

pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 743
28 nov. 2013 à 16:51

Oui.
Pourquoi? 255 ne te suffisent pas?

Cécile
28 nov. 2013 à 16:57

C'est par curiosité étant donné que je ne connaissais pas ce code , je voulais donc savoir s'il était possible de réaliser cette fonction autrement.

pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 743
Modifié par pijaku le 28/11/2013 à 16:58

Lis bien, et en entier, ce tutoriel sur les variables...

Réponse 2 / 3

pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 743
28 nov. 2013 à 16:32

Bonjour,

Avec une petite boucle.
Exemple pour ajouter 10 feuilles :

Sub Ajout_Feuilles()
Dim x As Byte

For x = 1 To 10
    ThisWorkbook.Worksheets.Add After:=Sheets(ThisWorkbook.Worksheets.Count)
    ActiveSheet.Name = "folio " & x
Next
End Sub

Réponse 3 / 3

Cécile
28 nov. 2013 à 16:41

Merci c'est parfait !

pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 743
28 nov. 2013 à 16:48

Mais de rien.
A+

Discussions similaires

Annuaire portable gratuit à partir d'un nom

Comment trouver un numéro à partir du nom et prénom

Chemin Logo du site de la Cité de l'espace

Formule Excel : "SI" une cellule contient un mot, alors ?

Discussions similaires

Newsletters