2065 résultats trouvés

par fred2406
Hier, 16:44
Forum : Excel - VBA
Sujet : Erreur Cmpilation
Réponses : 4
Vues : 25

Re: Erreur Cmpilation

Comme ça je dirais qu'il faut
soit reconstruire la liste de fichier et refaire un affichage complet
soit ajouter ce nouveau fichier à la liste...
Faudrait voir comment tu fais initialement
Fred
par fred2406
Hier, 16:33
Forum : Excel - VBA
Sujet : Erreur Cmpilation
Réponses : 4
Vues : 25

Re: Erreur Cmpilation

Re bonjour
je t'ai proposé une méthode pour copier le fichier dans le précédent post.... il ne convient pas ??
Fred
par fred2406
Hier, 16:31
Forum : Excel - VBA
Sujet : Construire un tableau récapitulatif
Réponses : 3
Vues : 38

Re: Construire un tableau récapitulatif

Le problème est donc résolu ???
si oui
:btres:
:thx:
Fred
par fred2406
Hier, 16:22
Forum : Excel - VBA
Sujet : Application.GetOpenFilename nom fichier
Réponses : 3
Vues : 26

Re: Application.GetOpenFilename nom fichier

re
tant mieux... mais je ne vois pas pourquoi la ligne de commande est plus simple que :
nomFic = Split(myfile, "\")(UBound(Split(myfile, "\")))
Bonne continuation
Fred
par fred2406
Hier, 16:12
Forum : Excel - VBA
Sujet : Application.GetOpenFilename nom fichier
Réponses : 3
Vues : 26

Re: Application.GetOpenFilename nom fichier

Bonjour un truc du genre Sub copie_fichier() Dim myfile As String Dim oFSO As Object Dim nomFic$, CheminDest$ Set oFSO = CreateObject("Scripting.FileSystemObject") myfile = Application.GetOpenFilename(, , "Browse for Files") nomFic = Split(myfile, "\")(UBound(Split(myfile, "\"))) CheminDest = ThisWo...
par fred2406
Hier, 15:55
Forum : Excel - VBA
Sujet : Construire un tableau récapitulatif
Réponses : 3
Vues : 38

Re: Construire un tableau récapitulatif

Bonjour
:bv:
Ci joint une première proposition par macro.
on verra ensuite pour traiter un ensemble de fichier, il faudra apporter quelques précisions
il activer les macros et appuyer sur le bouton bleu...
dans l'attente d'un retour
Fred
par fred2406
Hier, 12:14
Forum : Excel - VBA
Sujet : Chercher / remplacer : expression exacte
Réponses : 2
Vues : 33

Re: Chercher / remplacer : expression exacte

Bonjour à tous
@cousinhub même idée...
Fred
par fred2406
3 avril 2020, 16:27
Forum : Excel - VBA
Sujet : Enregistrer un fichier dans un répertoire inexistant
Réponses : 15
Vues : 116

Re: Enregistrer un fichier dans un répertoire inexistant

Re
je viens de penser a quelque chose....
essai avec cette instruction pour déterminer la Derligne :
DerLigne = Range("B" & Rows.Count).End(xlUp).Row
Fred
par fred2406
3 avril 2020, 15:54
Forum : Excel - VBA
Sujet : Enregistrer un fichier dans un répertoire inexistant
Réponses : 15
Vues : 116

Re: Enregistrer un fichier dans un répertoire inexistant

Donne un fichier test...
il faut comprendre pourquoi DerLigne ne te donne pas ce que tu attends....
Fred
par fred2406
3 avril 2020, 14:23
Forum : Excel - VBA
Sujet : Enregistrer un fichier dans un répertoire inexistant
Réponses : 15
Vues : 116

Re: Enregistrer un fichier dans un répertoire inexistant

BOnjour si tu connais la dernière ligne occupée avec DerLigne = Range("B1").End(xlDown).Row il suffit de faire le lien hypertexte dans celle ligne colonne B ?? si j'ai bien compris donc je verrais plutôt quelque chose comme cela : ActiveSheet.Hyperlinks.Add Anchor:=cells(DerLigne,"B"), Address:=chem...