Résultats de la recherche

oui , il s'agit d'un doublon. J'ai fait une erreur car ce n'est pas le même sujet de post. Merci

Quelle rapidité 😆 Merci beaucoup

Je suis occupé d'avancer dans le classeur pour la sauvegarde et je coince dans le copier/coller. Pourquoi? Car je copie des valeurs en colonne pour les mettre en ligne à la suite en colonne "A". Je souhaiterais conserver la mise en page mais pas possible de copier/coller ""colonnes"" vers...

Je suis occupé d'avancer dans le classeur pour la sauvegarde et je coince dans le copier/coller. Pourquoi? Car je copie des valeurs en colonne pour les mettre en ligne à la suite en colonne "A". Je souhaiterais conserver la mise en page mais pas possible de copier/coller ""colonnes"" vers...

Merci pour ton retour aussi. Sorry pour le délai ☺️

merci beaucoup ! La fonction marche parfaitement !:)

Bonjour Sylvanu, Voici le fichier en pièce jointe, ce sera en effet nettement plus simple. Bonne journée,

Bonjour, J'ai un problème de compréhension sur une écriture VBA pour rechercher sur base de plusieurs critères . Est-ce que je dois utiliser une autre méthode que rechercheV? Voici le code qui fonctionne avec une variable mais j'aimerais afficher la valeur sur base de 4 variables et dès qu'il...

For i = 1 To 10 If wsCopy.Range("g" & i + 100) <> "0" Then lDestLastRow = wsDestT.Cells(wsDest.Rows.Count, "B").End(xlUp).Offset(1).Row wsCopy.Range("A" & i + 100, "K" & i + 100).Copy wsDestT.Range("A" & lDestLastRow).PasteSpecial Paste:=xlPasteValuesAndNumberFormats End If Next

Bonjour à tous, J'aimerais executer un copiè/collé en fonction de la collone G dans une plage définie. Est-ce qu'avec la fonction For each cela est possible?ou Boucle? lDestLastRow = wsDestT.Cells(wsDest.Rows.Count, "B").End(xlUp).Offset(1).Row wsCopy.Range("A101:K110").Copy...

Super merci 😁

Bonjour, Une question par rapport à ce code, je souhaiterais copier coller en valeur mais je ne sais comment... avec .value ou Pastespecial? Set wsCopy = Workbooks("ClasseurA.xlsm").Worksheets("Suivi prod") Set wsDest = Workbooks("CalsseurB.xlsx").Worksheets("Données") lDestLastRow =...

Ah OK super merci cela fonctionne. lDestLastRow = wsDest.Cells(wsDest.Rows.Count, "A").End(xlUp).Offset(1).Row wsCopy.Range("A100:I100").Copy _ wsDest.Range("A" & lDestLastRow) En plus , je ne suis pas obligé de copier toute la ligne en fait. Cependant encore une question : lors du collage...

Bonjour, J'ai exploité un partie de code sur le forum mais je ne comprends pas tout de ce code. Le morceau de code qui coince se trouve dans la copie d'une ligne située à la 100éme ligne du classeurA à copier sur la feuille "Données" du classeurB à la dernière ligne vide. Dim wsCopy As...

Re, J'ai quand même creusé. ton code fonctionne depuis le début mais ma feuille est protégée donc j'ai rajouté : ActiveSheet.Unprotect ("test") .Sheets("Suivi prod").Range("D3:F3").Value = .Sheets("Suivi prod").Range("D3:F3").Value Merci pour l'aide

Euh... Effectivement , c'est vous qui avez la solution plus simple : Dim chemin$ With ThisWorkbook ....... Range("D3:F3").Value = Range("D3:F3").Value .SaveAs Filename:=chemin & "\" & Format(Date, "yyyymmdd") & Range("H3") & Range("B9") & ".xlsm", FileFormat:=xlOpenXMLWorkbookMacroEnabled...

voila j'ai essayer et cela fonctionne : Range("D3:F3").Select Selection.Copy Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False le code écrase la formule et quand la sauvegarde s'effectue le classeur source conserve la...

Quelle rapidité il m'indique une erreur avec ceci : .Sheets("Suivi prod").Range("D3:F3").Select = .Sheets("Suivi prod").Range("D3:F3").Value J'ai aussi essayer avec Value au lieu de select. merci

Bonjour, J'ai déjà le code pour enregistrer un fihcier avec un chemin comprenant la date du jour via un bouton. Voici la macro : Dim chemin$ With ThisWorkbook If MsgBox("L'encodage de votre rapport est terminé?", vbYesNo, "Validation") = vbYes Then If Range("H3") <> "" And Range("B9") <> ""...

Bonjour, Je n'arrive pas à concevoir le code VBA pour extraire les noms des images lorsque celle-ci ce retrouve dans le classeur. (elles sont biens dans des cellules distinctes mais sans le nom) Quelqu'un peut me donner une piste? Merci Bonne journée