Résultats de la recherche

Bonjour, Je n'arrive pas a faire un copier coller (d'un tableau + text) de la sheet "tab1" d'un excel à un ppt (test-> sheet 1) en vba. j'ai trouver des pistes mais rien de concluant. Merci d'avance =), je mettrais la réponse si je la trouve.

en gros je bloque sur la fomulation de cette ligne : Formula = "=VLOOKUP(B" & I & ",'"stock S" & Application.WeekNum(Date, 21)'!$B:$D,3,)" Merci d'avance car s'est compliquer x)

Bonjour, ActiveWorkbook.Sheets("stock S " & Application.WeekNum(Date, 21)).Activate Dim derligne1 derligne = ActiveWorkbook.Sheets("stock Go3 S " & Application.WeekNum(Date, 21) - 1).Cells(Rows.Count, 1).End(3).Row For I = 1 + 1 To derligne ActiveWorkbook.Sheets("stock S " &...

Bonjour, J'aurais une petit question en vba je crée des page avec la variable nom + & Application.WeekNum(Date, 21) Pour créée chaque semaine une sheet avec encour s1 . exemple :With ActiveWorkbook.Sheets("encour S " & Application.WeekNum(Date, 21)).Range("A2:A65356") Mais je voudrais en vba...

Merci, pour l'aide =) mais j'ai peut test cette exemple pour des tableaux mais la je vien de voir un erreur et toujours en boucle une idée? thanks sur la ligne set diapo

Bonjour, je bloque sur un exemple que je voudrais mettre en place, Je vous explique je souhaiterais juste passer un graphique avec des données + un tableau (une sheet complete) qui se nome programme p - > sheet"synthese p" et le copier sur le ppt programme p.pptx sheet 2. en regardant sur...

Re , non car je fait chaque semaine une sorte de poste traitement avec des filtres automatiser et la taille des ref peut changer de 5 a 15. mais sa me donne un début de piste ! merci =)

Bonjour, Ci-joint l'exemple. Merci du conseille =)

Bonjour je voudrais savoir si j'ai un tcd avec un référence a1 qui est équivalente a part une lettre et un chiffre après faire la fusion autommatique en vba ou autre merci d'avance =) exemple début a1 b1 c1 365-526 2...

On Error Resume Next Worksheets("-0 1").PivotTables("Tableau croisé dynamique1").PivotFields("Code Magasin").PivotItems.Item("").Visible = True On Error GoTo 0 Résolue! =)

Bonjour, Je vien plus pour un interrogation si il i avais un if erreur qui existait pour éviter un bug de non existant Dim Pt As PivotTable Dim Pf As PivotField Dim Pi As PivotItem Application.ScreenUpdating = False With Sheets("- 1") Set Pt = .PivotTables("Tableau croisé dynamique1") End With...

Bonjour Merci deja pour ton aide Jocelyn s'est deja au top ! Ce lien n'existe plus bah je doit l'automatiser pour des personnes qui ne connaisse pas l'allongement de formule x). pour les deux pages une reception des données filtres etc et l'autre traitement delta etc. Mais des que je trouve la...

merci c'est bien sa !! question on peut la faire en vba avec vlockup ? merciiiiii désoler pour ma mauvaise explication =)

=INDEX(D:D;feuille3!B:C+feuille 3!B:C;'feuille 2'!B:R)

la feuille ou on doit récuperer les information est la feuille3 et celle qui affiche s 'est la feuille2.

un exemple ce serait pour prendre le montant et se référer a ref et magasin . veuillez m’excuser débit d'un autre temps xD.

=SI(SOMMEPROD(($B$2:$B$300=B2)*($C$2:$C$300=R2)*($F$2:$F$300))=0;"rien";SOMMEPROD(($B$2:$B$300=B2)*($C$2:$C$300=R2)*($F$2:$F$300)))

Bonjour, comment peut t'on faire un double recherche v en un je m'explique je voudrais faire un recherche v qui me permet de voir ma référence et ma référence sup colonne B et C pour me mettre un montant colonne D mais ayant de nombreux doublons en référence je doit me fier a ref et ref sup ...

Function Countccolor(range_data As Range, criteria As Range) As Long Dim datax As Range Dim xcolor As Long xcolor = criteria.Interior.ColorIndex For Each datax In range_data If datax.Interior.ColorIndex = xcolor Then Countccolor = Countccolor + 1 End If Next datax End...

Bonjour en gros ce qui me manque s 'est une boucle foreach pour récupérer grace a CountCcolor(C6:AO6; AN6) une valeur sur la meme colonne ligne 5 pour un calcul mais je ne sais pas la faire. .