Recopie ligne formules par vba et optimisation

ChTi160

XLDnaute Barbatruc
Salut KIM
bonjour pierrejean ,Bebere
le Forum
en pièce jointe j'ai utilisé le fichier de Pierre et j'y est inclu un bouton pour l'affichage du userform
j'ai ensuite fait en sorte qu'a son initialisation les données de la plage N9:Nx prennent place dans le combobox
pour le reste je n'ai pas trop compris mais je pense que ce soir (car il faut que j'aille au boulot) tu nous auras éclairé KIM
bonne journée [file name=KIM1_070606.zip size=18112]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/KIM1_070606.zip[/file]
 

Fichiers joints

ChTi160

XLDnaute Barbatruc
Salut Bebere
moi je me suis absenté 2 jours et quand je suis rentré j'étais perdu Lol
il reste à KIM a nous mettre un exemple du fichier car il y a quelques explications que je ne comprends pas
@JeanMarie, merci, A intégrer la macro dans un bouton de l'USF de Pierrejean.
1- Est-il possible d'intégrer (macro de JM) un bouton pour la creation de CIBLE1 avec l'ensemble des DEP
donc si le patron passe par la
merci d'avance Lol
bonne journée
 

KIM

XLDnaute Accro
Re,
@Bebere,
Merci de ton encouragement,
2 cas m'ont été soulevé ce matin:
1- Dans la construction du tableau récapitulatif des données dans la feuille DATA2:
- création de la liste des projets (col G5:...)
- création da la liste des DEP (ligne I4:...)
- Mise en place des titres , recopie et execution des formules dans H5:derniere cellule de la zone calculée dynamiquement.
Est-il possible avec un menu et choix de creer dynamiquement (c-à-d les limites des lignes et colonnes ne soient pas figées mais définies selon les données traitées) à partir des colonnes A, B, D de la feuille DATA2 créer deux recapitulatifs dans 2 nouvelles feuilles dont le premier recap est le meme que celui déjà fait (col G = liste des projets, ligne I = liste des DEP) et le 2ieme recap intervertir les entêtes des lignes et colonnes (col G = liste des DEP et ligne I = liste des projets)avec le formatage des entetes et des titres.
Les formules sont toujours les memes car ils dependent de l'entete de chaque ligne et chaque colonne.
2- Dans le classeur final je créé plusieurs feuilles, comment les trier apr nom pour qu'elles apparaissent par ordre alphabetique?
Je connais les feuilles initiales de mon classeur qui doivent etre exclues du tri des feuilles créées par macro. Je vais faire une recherche sur le forum mais si tu as une idée, la bienvenue.
merci d'avance
KIM
 

pierrejean

XLDnaute Barbatruc
re tous

Point 2 pas trop complexe finalement !!

@ Jean Marie

des que possible je jete un oeil sur ton fichier [file name=KIM1_20060607101517.zip size=21547]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/KIM1_20060607101517.zip[/file]
 

Fichiers joints

KIM

XLDnaute Accro
Re,
Salut Jeanmarie,
@JeanMarie,
donc si le patron passe par la
C'était pour repondre à Pierrejean que ma solution serait un mixte de l'ensemble des solutions de ce fil

@Pierrejean, je viens de voir ton message
je vais regarder le fichier.

@Bebere,
Que je suis bête, Pour transposer ligne en col et col en ligne dans le tableau recapitulatif,
il suffit de modifier le remplissage de la col G et de la ligne I en dupliquant ta macro et modifer les references des données initiales.

Je teste et je reviens vers vous
merci
KIM
 

KIM

XLDnaute Accro
Re,
@Pierrejean,
je n'ai pas vu de point2 dans ton fichier joint KIM1.
Peux-tu me renvoyer ta derniere contribution?
Merci
KIM
 

pierrejean

XLDnaute Barbatruc
re KIM

on ne s'est peur-etre pas compris sur le point2

pour moi il s'agit de la liste des dep qui est bien traitée dans le dernier KIM1

je le remets tout de même [file name=KIM1_20060607110240.zip size=18493]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/KIM1_20060607110240.zip[/file]
 

Fichiers joints

pierrejean

XLDnaute Barbatruc
re

avec mise à jour de la liste [file name=KIM1_20060607113504.zip size=20418]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/KIM1_20060607113504.zip[/file]
 

Fichiers joints

KIM

XLDnaute Accro
Re, les amis, et le forum,
Je viens de perdre mon fichier de travail avec les données reelles et les differentes macros intégrées et adaptées à ce fichier. Il y a une heure, Filesecure me dit que ce fichier est infecté par un virus inconnu. Je n'arrive plus à le modifier ni à le sauvegarder, ni sauvegarder sous. Je force Excel à quitter et je ne peux ouvrir ce foutou fichier. Je l'ai testé avec Panda antivirus, panda ne voit pas le virus, avec Filesecure, FS le detecte en tant que fichier corrompu par un virus inconnu. ....
Je vais rechercher d'autres solutions...
merci
KIM
 

KIM

XLDnaute Accro
Re,
Enfin, j'ai récupéré mon fichier.
@Jeanmarie,
dans ta macro recupformule, tu definies dans un tableau les differentes formules à utiliser
et tu les copies dans H2:O2
Il m'arrive d'avoir des formules dans des cellules non contigues. Est-il possible de copier dans H5 la formule du tableau(2)
dans K5 celle du tableau(3) et dans K5:M5 celles du tableau(4,5 et 6)

@Bebere
Merci pour la modif
Bien amicalement
KIM
 

ChTi160

XLDnaute Barbatruc
Salut KIM
bonsoir le fil
bonsoir le Forum

en pièce jointe une possibilite avec un select case qui permet d'adapter l'endroit où l'on colle la Formule en fonction de l'indice du tableau [file name=prj_KIMv2_07062006.zip size=34731]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/prj_KIMv2_07062006.zip[/file]
 

Fichiers joints

KIM

XLDnaute Accro
Salut Jeanmarie, le fil et le forum,
@Jeanmarie,
merci de tes explications,
Je me heurte sur un problem de syntaxe depuis 2 heures et je n'arrive pas à trouver la solution.
Il y des fois j'utilise une meme formule pour plusieurs cellules mais avec des references differentes (voir fichier ci-joint)
Ex:
Dans I2, il y a la formule =SOMMEPROD((ColD=$G2)*(ColA=I$4)*ColB)
que j'essaye de declarer dans un tableau tableau(0) = ...

les limiites du tableau final sont calculées par le code ci-dessous (merci au Dream Team)
Dercol = IIf(.Cells(5, 255).End(xlToLeft).Column < 7, 7, .Cells(5, 255).End(xlToLeft).Column)
Derlgn_C = .Range('C65536').End(xlUp).Row
Si je copie à la main I2 dans I5 et je glisse avec la souris I5 à droite jusqu'à la derniere colonne et vers le bas jusquà la derniere ligne, la formule se recopie avec les bonnes references des cellules.
Depuis plus d'une heure j'essaye toutes les combinaisons déjà vue sans résultat.
Est-il possible d'envisager les 2 cas c-dessous que je souhaite utiliser avec une seule formule dans tableau(0):
1- For Col = 7 To Dercol
Range(Cells(6, Col)).FormulaLocal = Tableau(0)
Next Col
me donne un message d'erreur.
2- For Col = 7 To Dercol
For Lgn=5 To Derlgn
Range(Cells(Lgn, Col)).FormulaLocal = Tableau(0)
Next Col
Next Lgn
meme message d'erreur
C'est tres pratique car on n'utilise qu'une seule formule quand c'est possible
Merci d'avance
Bonne nuit
KIM [file name=prj_KIMv31_JM.zip size=32238]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/prj_KIMv31_JM.zip[/file]
 

Fichiers joints

Bebere

XLDnaute Barbatruc
bonjour Kim,Pierre-Jean,Jean-Marie,le Forum
moi, je rêvais à des (a3-b3)3(lol)
beau temps,donc jardin(il y a du retard)
si j'ai bien compris solution pièce jointe
à bientôt [file name=prjKIMv31JM.zip size=37617]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/prjKIMv31JM.zip[/file]
 

Fichiers joints

pierrejean

XLDnaute Barbatruc
bonjour KIM Jean Marie bebere

@bebere

je jetes un cil sur ton travail mais comme j'ais aussi commis quelquechose je le soumets

@KIM
quid de KIM1 ? [file name=prj_KIMv31_JM_20060608100608.zip size=41557]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/prj_KIMv31_JM_20060608100608.zip[/file]
 

Fichiers joints

KIM

XLDnaute Accro
Bonjour Pierrejean, Jeanmarie, Bebere et le forum,
Depuis ce matin je n'arrive plus à répondre à ce fil. Comme reponse j'ai erreur su serveur.

@Pierrejean,
Concernant ta macro de recopie de formules,
fichier joint avec commentaires.
merci d'avance
KIM
 

KIM

XLDnaute Accro
Bonjour Pierrejean, Jeanmarie, Bebere et le forum

@Pierrejean,
Dans ton code tu prevois les forules dans une feuille 'Formules'
qu'on peut effectivement cachée à l'utilisateur final.
Quand les formules sont similaires, manuellement on crée la formule dans une celleule
et on la recopie à droite ou en bas et les references se mettent à jour automatiquement.
1- Est-il possible d'appliquer cette methode dans ton code?
Dans le fichier joint, j'ai conservé seulement 3 formules pour H5, J5, et N5
Dans ta macro, après avoir recopié les formules dans les cellules correspondantes,
comment on peut rajouter les cas ci-dessous:
Celle de H5 ne concerne que la colonne H, donc pas de recopie à droite.
Celle de J5, la recopier jusqu'à la col M c-a-d 3 col à droite,
celle de N5, la recopier jusquà finH derniere col non vide de la ligne 4
et ensuite on recopie vers le bas l'ensemble de la ligne H
Merci d'avance
Bien amicalement
KIM
 

KIM

XLDnaute Accro
Re,
J'ai l'impression que le serveur n'accepte de ma part des pieces jointes ni un grand message.
je modifie le nom de la piece jointe et je le renvoie
Merci de votre patience
KIM
 

KIM

XLDnaute Accro
Re,
Sans succes, peut etre à cause de mon message du 07/06/2006 à 13h sur ce fil
J'ai envoyé un message à l'Administrateur du serveur.
A+
KIM
 

Discussions similaires


Haut Bas