Contenu récent par sharkantipav

Bonjour et merci de la reponse. En fait comme cet onglet bouge vers un nouveau fichier ce probleme n'arrive pas. Par contre un fait que j'ai remarque, c'est qu'en fait la macro ecrase le fichier existant ioiname = "F:\Delta XXXXXXXXXXXXXXXXXXXX " & Format(Date, "DDMMMYY") & ".xls" du coup la...

Bonjour, Jai un fichier sur lequel j'utilise la macro suivante. Elle tourne bien des que je l'execute la1ere fois. Si je l'execute une 2eme fois avec des donnees differentes. Elle me fait crasher tout mes excel. une idee de ce qui pourrait declencher cela. Merci bcp Sub saveIOI() Dim endI As...

Bonjour, J'ai le morceau de code suivant Dim r2 As Range Set r2 = Sheets("Invoices").Range(Range("G5"), Range("G5").End(xlDown)) On Error Resume Next Set r2Filtered = r2.SpecialCells(xlCellTypeVisible) On Error GoTo Ex2 J'ai un souci car Excel ignore le On Error Resume Next La...

Bonjour tlm, J'essaye d'automatiser une manoeuvre manuelle. Je copie sur un autre logiciel un champ de donnee et je le colle sur excel en utilisant Text Import Wizard et je selectionne Tab delimited pour coller sous forme de tableau excel en remarquant chaque Tab separation. Lorsque...

Merci bcp C'est parfait!!

Bonjour, J'essaye d'ecrire la macro suivante: j'ai un fichier Hebdo qui contient 7 colonne A:G ds la Sheet SSR Ds un dossier windows, j'ai plusieur fichier contenant le meme colonnes Je souhaiterai que ma macro les ouvre un par un, et copie les un a la suite ds la Sheet SSR Optionel...

Merci bcp!!

Franchement impressione. Merci bcp

Bonsoir voici un fichier test Merci beaucoup

Bonjour tt le monde, J'ai une question de tri originale que je n'arrive pas a resoudre en automatique/macro. Voici mon cas: Column A des Noms Column B des Valeurs qui peuvent positives ou negatives But Je voudrais trier ces 2 colonnes de la facon suivante: avoir tt les negatifs tries...

Bonjour, J'ai la macro suivante qui ouvre un fichier, copie/colle un range ds mon fichier original puis le ferme 'open basket FilePath = Application.GetOpenFilename("Text Files (*.xlsx), *.xlsx") If FilePath <> False Then Range("B3").Value = FilePath End If Dim x As Workbook Dim y As...

Bonjour, J'ai un probleme recurrent avec Excel lorsque plusieurs fichiers sont ouvert, je vais essayer de le decrire, pour voir si d'autres personnes ont pareil, ou mieux si il ya une solution. Voici la situation: - j'ai plusieurs fichiers ouvert dont certains avec macro ou d'autres avec des...

Bonjour, j'ai une question de Tri atypique,je n'arrive pas a la resoudre a part la faire manuellement. Je souhaiterai le faire en VBA J'ai attache un fichier exemple: En colonne A j'ai des noms puis en colonnes B, C, D j'ai des nombres 1ere etape (facile): Consiste a trier la colonne B...

parfait !! Merci bcp les amis

Merci beaucoup Pierrejean, tu es un champion Question: Admettons que je veux un 3eme rang (apres 0,1,2) Je dois bien entendu respecifier les tableau de depart Mais apres je devrais avoir ca ? tabres(1, UBound(tabres, 2)) = tablo(n, 1) tabres(2, UBound(tabres, 2)) = tablo(n...