Résultats de la recherche

Merci, testé et validé

en checkant les resultats, j'ai eu quelques problèmes, la somme entre les balises n'est pas bonne. J'ai adapté la macro car mes données sont décalées un peu plus sur la gauche mais cela ne change en rien les resultats que l'on devrait trouvé

Question subsidiaire, pourquoi Début et Fin ne sont pas reconnues comme variable ? Faut-il les déclaré préalablement ?

Merci bien, cela fonctionne au petit oignon.

cela marche bien mais J'ai corrigé le besoin mais est-ce que l'on peut avoir une macro pour que cela rentre en automatique avec les bonnes "bornes" pour la formule ?

Bonjour, Je bloques sur la formule à utiliser pour faire la somme dans mon tableau suivant : en M11, on a la somme des valeurs entre deux changements qui sont représenter en vert. Idem en Jaune pour P12, en bleu pour S10 et en rouge pour V11. Merci par avance de vos réponses.

Bonjour, j'ai corrigé comme tu as marqué. Cela fonctionne très bien maintenant mais je n'ai pas compris pourquoi cela bloquait entre les 2 fonctions Merci

question peut-être bête mais ton exemple tu l'aurais pas pris pour l'éditeur de google non pour Excel ?

J'ai joint le fichier en espérant un peu plus de réponse le MdP est 1 La partie de la copie se trouve dans FMod La partie de l'affichage se trouve dans FMTest

Bonjour, J'ai un petit soucis dans mes macros, ' Copie de la feuille Data Sheets("Data").Select Sheets("Data").Copy After:=Sheets(2) ActiveSheet.Name = Sheets("Data").Range("G3") ActiveWindow.SelectedSheets.Visible = False ' Copie de la...

ça marche nickel ! Mais pourquoi est-on obligé de faire la césure au & ?

non, cela bloque toujours :'( je te joints le code complet Sub pointage() ' ' ' X = 5 Z = 13 W = 51 For n = 5 To 5 + 2 * (W - 1) Step 2 Cells(X, Z).FormulaLocal = _ "=SIERREUR(RECHERCHEV($A5;CFU!$A$4:$DA$150;" & n & ";FAUX);)+SIERREUR(RECHERCHEV($A5;MFS!$A$4:$DA$150;" &...

ça ne marche pas ! L’éditeur me corrige la formule en mettant Cells(X, Z).FormulaLocal = _ "=SIERREUR(RECHERCHEV($A5;CFU!$A$4:$DA$150;" & n & ";FAUX);)_" "+SIERREUR(RECHERCHEV($A5;MFS!$A$4:$DA$150;" & n & ";FAUX);)"

Bonjour, j'essaye de fractionner une formule vba mais je bute avec les & et " j'ai à l'origine Cells(X, Z).FormulaLocal = _ "=SIERREUR(RECHERCHEV($A5;CFU!$A$4:$DA$150;" & n & ";FAUX);)+SIERREUR(RECHERCHEV($A5;MFS!$A$4:$DA$150;" & n & ";FAUX);)" que je voudrais afficher dans...

Toujours mon problème de la première colonne à la fin. Si quelqu'un pouvait m'expliquer pourquoi et comment le résoudre. Merci.

Merci beaucoup, je galérais pour cette partie du code. Sub Création_Matelas() ' ' Création Macro ' Dim drLig As Long Dim n As Integer drLig = Sheets("Feuil1").Range("C" & Rows.Count).End(xlUp).Row Range("H6:H25").ClearContents Range("H33:H60").ClearContents...

Bonjour à tous, J'essaie de faire une boucle de copie de colonne en vba selon un nombre X d'itération dans l'enregistreur de macro, j'obtiens ceci : Columns("G:H").Select Range("G2").Activate Selection.Copy Range("I1").Select ActiveSheet.Paste Range("K1").Select...

Bon, j'ai apprécié vos réponses mais la chose est un peu plus compliquée. Je dois faire une synthèse de plusieurs feuilles sur une seule et selon des critères définis. Je n'arrive toujours pas à comprendre comment marche la fonction MOD. Bon, je triche un peu sur mon fichier car je ne sais pas...

Bonjour à tous, Voilà je suis entrain de faire un tableau et je galère à faire une formule avec la somme d'une colonne sur deux dans ce tableau. j'ai dans un premier temps testé sur 3 itérations, donc assez simple mais je dois le faire sur 51 semaines, là ça commence à devenir ingérable vu la...

Merci pour la solution Set Rng = Range("A1:F" & drLig) ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:=Rng, _ Version:=6).CreatePivotTable TableDestination:= _ "Matelas!R1C8", TableName:="Tableau croisé dynamique3", DefaultVersion:=6 Voilà le...