Creation de plusieurs fichiers en VBA
ridam57
Messages postés
1
Date d'inscription
Statut
Membre
Dernière intervention
-
ShaBoo Messages postés 406 Statut Membre -
ShaBoo Messages postés 406 Statut Membre -
Bonjour,
Je débute en VBA et franchement je trouve ça super mais un peu chaud quand même
J'ai lu certains messages et apparemment il y a pas mal de gens prêts a rendre service et j'apprécierais vraiment de l'aide
Voila: je voudrais créer des nouveaux fichier a partir d'un modèle (fichier A).
J'ai une colonne (E) du fichier A qui contient des données mais je ne veux garder que celles qui sont numeriques
Si c'est le cas je dois copier chaque valeur dans une cellule du nouveau fichier (fichier B) et la cellule offset (0,2) (donc la colonne C par rapport a la E du fichier A) sera enregistrée comme nom de la feuille
Chaque fichier serait enregistré avec le même nom mais avec un numéro en plus (ex: fichier b1, fichier b2,etc...)
Je doit créer autant de fichiers que de valeur numérique selectionnées par la boucle de la colonne E en question
Je peut être amené a ajouter des lignes donc je pense que je dois utiliser des coordonnées absolues.
en résumé:
- ajouter une feuille sur la base à partir du modèle. Ajouter une feuille contenant la ligne à utiliser.
- Utiliser des vlookup pour remplir les champs.
La macro fera ensuite une boucle à travers tous les numéros pour ensuite copier, copier coller en valeur et sauvegarder la feuille modèle sous un nouveau fichier.
9apeutparaitre simple pour certains mais franchement je galère!
Merci de votre aide
Je débute en VBA et franchement je trouve ça super mais un peu chaud quand même
J'ai lu certains messages et apparemment il y a pas mal de gens prêts a rendre service et j'apprécierais vraiment de l'aide
Voila: je voudrais créer des nouveaux fichier a partir d'un modèle (fichier A).
J'ai une colonne (E) du fichier A qui contient des données mais je ne veux garder que celles qui sont numeriques
Si c'est le cas je dois copier chaque valeur dans une cellule du nouveau fichier (fichier B) et la cellule offset (0,2) (donc la colonne C par rapport a la E du fichier A) sera enregistrée comme nom de la feuille
Chaque fichier serait enregistré avec le même nom mais avec un numéro en plus (ex: fichier b1, fichier b2,etc...)
Je doit créer autant de fichiers que de valeur numérique selectionnées par la boucle de la colonne E en question
Je peut être amené a ajouter des lignes donc je pense que je dois utiliser des coordonnées absolues.
en résumé:
- ajouter une feuille sur la base à partir du modèle. Ajouter une feuille contenant la ligne à utiliser.
- Utiliser des vlookup pour remplir les champs.
La macro fera ensuite une boucle à travers tous les numéros pour ensuite copier, copier coller en valeur et sauvegarder la feuille modèle sous un nouveau fichier.
9apeutparaitre simple pour certains mais franchement je galère!
Merci de votre aide
A voir également:
- Creation de plusieurs fichiers en VBA
- Renommer plusieurs fichiers en même temps - Guide
- Creation de site web - Guide
- Creation compte gmail - Guide
- Creation de compte google - Guide
- Media creation tool - Télécharger - Systèmes d'exploitation
1 réponse
Bonsoir,
Avec ceci, tu devrais peut etre t'en sortir :
+
Avec ceci, tu devrais peut etre t'en sortir :
SpecialCells, méthode
Voir aussiS'applique àExempleDétailsCette méthode renvoie un objet Range qui représente toutes les cellules correspondant au type et à la valeur spécifiés. Objet Range.
expression.SpecialCells(Type, Value)
expression Obligatoire. Expression qui renvoie un des objets répertoriés dans la liste S'applique à.
Type Argument XlCellType obligatoire. Cellules à inclure.
XlCellType peut être l'une de ces constantes XlCellType.
xlCellTypeAllFormatConditions. Cellules de n'importe quel format
xlCellTypeAllValidation. Cellules présentant des critères de validation
xlCellTypeBlanks. Cellules vides
xlCellTypeComments. Cellules contenant des commentaires
xlCellTypeConstants. Cellules contenant des constantes
xlCellTypeFormulas. Cellules contenant des formules
xlCellTypeLastCell. Dernière cellule dans la plage utilisée
xlCellTypeSameFormatConditions. Cellules de même format
xlCellTypeSameValidation. Cellules présentant les mêmes critères de validation
xlCellTypeVisible. Toutes les cellules visibles
Value Argument de type Variant facultatif. Si Type a la valeur xlCellTypeConstants ou xlCellTypeFormulas, cet argument est utilisé pour déterminer quels types de cellules inclure dans le résultat. Ces valeurs peuvent être ajoutées ensemble pour renvoyer plusieurs types. Par défaut, toutes les constantes ou formules sont sélectionnées, quel que soit leur type. Il peut s'agir de l'une des constantes XlSpecialCellsValue suivantes :
XlSpecialCellsValue peut être l'une de ces constantes XlSpecialCellsValue.
xlErrors
xlLogical
xlNumbers
xlTextValues
Exemple
Cet exemple montre comment sélectionner la dernière cellule de la plage utilisée dans la feuille Sheet1.
Worksheets("Sheet1").Activate
ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Activate
+
IsNumeric, fonction
Renvoie une valeur de type Boolean qui indique si une expression peut être interprétée comme un nombre.
Syntaxe
IsNumeric(expression)
L'argument expression est une valeur de type Variant contenant une expression numérique ou une expression de chaîne.
Remarques
La fonction IsNumeric renvoie la valeur True si l'ensemble de l'expression est reconnue comme étant un nombre ; sinon, elle renvoie la valeur False.
La fonction IsNumeric renvoie la valeur False si l'argument expression est une expression de date.
