Base de donnée
MC's Assigned geek
-
Mgml Messages postés 3 Date d'inscription Statut Membre Dernière intervention -
Mgml Messages postés 3 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Je commence à programmer en VBA pour mon travail, et j'aurai besoin d'insérer une ligne juste au-dessud d'une cellule dans tous les classeur à la fois. Cela ne pose actuellement pas trop de problème, mais la deuxième fois que je déclenche la procédure, il faudrait que la même case soit sélectionner, bien qu'elle ai été décalé.
exemple:
A B C Aprés insertion A B C
1 d'une ligne au 1
2 Mister mood dessus de A3 2 Mister mood
3 JAPON 3
4 4 JAPON
Il faudrait donc que lors du prochain déclenchement, ce soit la cellule A4 pour tous les classeurs qui soit selectionné, et non la cellule A3 comme initialement.
D'avance merci de votre aide précieuse sans quoi je ne sais pas comment je ferai
Je commence à programmer en VBA pour mon travail, et j'aurai besoin d'insérer une ligne juste au-dessud d'une cellule dans tous les classeur à la fois. Cela ne pose actuellement pas trop de problème, mais la deuxième fois que je déclenche la procédure, il faudrait que la même case soit sélectionner, bien qu'elle ai été décalé.
exemple:
A B C Aprés insertion A B C
1 d'une ligne au 1
2 Mister mood dessus de A3 2 Mister mood
3 JAPON 3
4 4 JAPON
Il faudrait donc que lors du prochain déclenchement, ce soit la cellule A4 pour tous les classeurs qui soit selectionné, et non la cellule A3 comme initialement.
D'avance merci de votre aide précieuse sans quoi je ne sais pas comment je ferai
A voir également:
- Base de donnée
- Base de registre - Guide
- Formules mathématiques de base - Télécharger - Études & Formations
- Gigaset ne reconnait plus sa base - Forum telephonie fixe
- Formules excel de base - Guide
- Gigaset a170h problème base ✓ - Forum telephonie fixe
13 réponses
bonjour,
j'ai compris (pas sur) partiellement.
Il faudrait donc que lors du prochain déclenchement, ce soit la cellule A4 pour tous les classeurs qui soit selectionné, et non la cellule A3 comme initialement
question : qu'est-ce qui détermine que ce sera la cellule A4?
Est-ce parce que c'est la dernière ligne?
j'ai compris (pas sur) partiellement.
Il faudrait donc que lors du prochain déclenchement, ce soit la cellule A4 pour tous les classeurs qui soit selectionné, et non la cellule A3 comme initialement
question : qu'est-ce qui détermine que ce sera la cellule A4?
Est-ce parce que c'est la dernière ligne?
Bonjour,
Désolé pour le message peu cohérent, j'avez complètement oublié que l'affichage était modifié... donc en faite il y a des vendeur Japonais, et il y a un total Japonais. Chaque vendeur doit être présent sur toutes les feuilles à la même ligne, et chaque ligne à la fin des vendeur Japonais doit représenter le total des produit vendu par les japonais.
En gros:
_________________ Produit1_______________________ Produit2
Vendeur 1
-
Vendeur 2
-
Vendeur 3
-
Vendeur 4
Total Japon_______Total des produits1_______________total des produits 2
Il me faudrais donc une macro qui ajoute un vendeur et qui re met le total a jours sur toute les feuilles à la fois...
D'avance merci pour l'aide,
Désolé pour le message peu cohérent, j'avez complètement oublié que l'affichage était modifié... donc en faite il y a des vendeur Japonais, et il y a un total Japonais. Chaque vendeur doit être présent sur toutes les feuilles à la même ligne, et chaque ligne à la fin des vendeur Japonais doit représenter le total des produit vendu par les japonais.
En gros:
_________________ Produit1_______________________ Produit2
Vendeur 1
-
Vendeur 2
-
Vendeur 3
-
Vendeur 4
Total Japon_______Total des produits1_______________total des produits 2
Il me faudrais donc une macro qui ajoute un vendeur et qui re met le total a jours sur toute les feuilles à la fois...
D'avance merci pour l'aide,
Sub test_ajout()
'
' Ajoute un vendeur dans toutes les feuilles
'
'
Dim Sh As Object
For Each Sh In Worksheets
Sh.Select ' pour voir ce qui se passe et sélectionner la feuille
Range("A65535").End(xlUp).Select ' la dernière ligne ( japon)
Selection.EntireRow.Select ' on sélectionne la dernière ligne
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove ' on insère une ligne au dessus
ActiveCell.Value = "Nouveau vendeur" 'on note le vendeur
Next
End Sub
Est-ce que cela répond à la demande?
Merci Bidouilleu_R, cela répond à la première partie de mon problème, mais si je refais tourner la procédure, il va séléctionner le même range, alors que ce ne sera plus le bon... et puis il faudrait aussi que les formules de somme se mettent à jours dans les colonnes...
Je te remercie de ton aide et attend de tes nouvelles avec impatience,
MC's a gK
Je te remercie de ton aide et attend de tes nouvelles avec impatience,
MC's a gK
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Bonjour,
j'ai essayé d'expliquer le code mais apparement... pas suffisant.
mais si je refais tourner la procédure, il va séléctionner le même range, alors que ce ne sera plus le bon...
Non! le programme fait :
1) sélection de la feuille
2) sélection de la première cellule non vide en partant du bas vers le haut
3)insertion d'une ligne au dessus de la dernière (donc l'avant dernière ligne)
4) écrit le nom ( que l'on peut paramétrer aussi)
il va séléctionner le même range, alors que ce ne sera plus le bon
Alors je n'ai pas compris !!!
le code insérera toujours l'avant dernière ligne
si tu veux qu'il insère la ligne n°4
il faut écrire....
For Each Sh In Worksheets
Sh.Select ' pour voir ce qui se passe et sélectionner la feuille
rows(5:5) Selection.EntireRow.Select ' on sélectionne la dernière ligne
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove ' on insère une ligne au dessus
ActiveCell.Value = "Nouveau vendeur" 'on note le vendeur
Next
il faudrait aussi que les formules de somme se mettent à jours dans les colonnes...
c'est pas difficle, mais j'aimerai que l'on règle ce premier point avant de faire le reste. je le prépare.
j'ai essayé d'expliquer le code mais apparement... pas suffisant.
mais si je refais tourner la procédure, il va séléctionner le même range, alors que ce ne sera plus le bon...
Non! le programme fait :
1) sélection de la feuille
2) sélection de la première cellule non vide en partant du bas vers le haut
3)insertion d'une ligne au dessus de la dernière (donc l'avant dernière ligne)
4) écrit le nom ( que l'on peut paramétrer aussi)
il va séléctionner le même range, alors que ce ne sera plus le bon
Alors je n'ai pas compris !!!
le code insérera toujours l'avant dernière ligne
si tu veux qu'il insère la ligne n°4
il faut écrire....
For Each Sh In Worksheets
Sh.Select ' pour voir ce qui se passe et sélectionner la feuille
rows(5:5) Selection.EntireRow.Select ' on sélectionne la dernière ligne
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove ' on insère une ligne au dessus
ActiveCell.Value = "Nouveau vendeur" 'on note le vendeur
Next
il faudrait aussi que les formules de somme se mettent à jours dans les colonnes...
c'est pas difficle, mais j'aimerai que l'on règle ce premier point avant de faire le reste. je le prépare.
En fait le problème c'est qu'il n'y a pas qu'un seul total, il y a le total de différent pays les uns sur les autres, et à la fin, il y a le total des totaux...
avec un fichier ou un exemple ... cela aiderai à la compréhension.
note! Tu n'as pas répondu à la question...
note! Tu n'as pas répondu à la question...
sur ci-joint ou sur free
tu charges ton fichier dans le serveur et tu postes le lien.
évite les infos confidentielles et si le fichier et trop volumineux : épure-le!
http://www.cijoint.fr/
ou
http://dl.free.fr/
ou encore envoie moi le fichier en MP (click sur le pseudo puis click sur message privé)
je te répondrai ici.
A+
tu charges ton fichier dans le serveur et tu postes le lien.
évite les infos confidentielles et si le fichier et trop volumineux : épure-le!
http://www.cijoint.fr/
ou
http://dl.free.fr/
ou encore envoie moi le fichier en MP (click sur le pseudo puis click sur message privé)
je te répondrai ici.
A+
bonjour,
ou bonne nuit (vu l'heure de ton dernier post... ou alors on se chatouille les pieds : ) )
explique-moi ce que tu veux.
je comprends la structure du fichier ....(aucune macro n'est présente)
si tu es clair j'essaierai de l'être aussi...
soit précis car s'il y a 8h à 10h entre 2 posts .... je te laisse deviner la difficultée.
ou bonne nuit (vu l'heure de ton dernier post... ou alors on se chatouille les pieds : ) )
explique-moi ce que tu veux.
je comprends la structure du fichier ....(aucune macro n'est présente)
si tu es clair j'essaierai de l'être aussi...
soit précis car s'il y a 8h à 10h entre 2 posts .... je te laisse deviner la difficultée.
