Contenu récent par INFSON

Merci de vos réponses , ça fonctionne très bien Je n'aurai pas su faire ce code tout seul Je vais essayer de comprendre , c'est pas, gagné :)

Bonjour Je mets en pièce jointe un fichier excel test avec la macro de fin de message J'ai écrit une macro dont le but est de mettre à jour les colonnes F et G de la feuille FLUX en fonction d'un mot trouvé dans la colonne D La macro fonctionne mais n'est pas très fonctionnelle en cas de...

C'est dommage à un moment le post 11 a été modifié La macro avant la modif mais j'ai pas eu le temps de voir si elle générait des raccourcis de type URL et non .lnk comme dans Macro test11()

c'est bizarre j'ai l'impression qu'il y a 2 canaux de lecture celui ci https://www.excel-downloads.com/threads/vba-excel-creation-de-raccourcis-windows-a-partir-durl-dans-un-colonne.20057791/page-2#post-20435031 et...

Pour en être sûr j'ai crée un raccourci sur le chemin cible c'est bien C:\Users\BRUNO2\Desktop\TEST\CIBLE comme indiqué dans le fichier joint Je le republie avec les différents hypothèses seul la macro d'origine fonctionne test 1 https://cjoint.com/c/KFhnzkb5GKT

Non tjrs même bug

Non plantage

Je ne vois pas sur quelle ligne Sub TEST3() Dim Emplacement As String, Word As Variant, Ligne As Range, Fso As Object Set Fso = CreateObject("Scripting.FileSystemObject") With Worksheets("Feuil1") For Each Ligne In .Rows("2:" & .Cells(.Rows.Count, 3).End(xlUp).Row) With...

Avec la macro corrigée 11 j'ai désormais une erreur

Ca fonctionne , j'ai enlevé la première ligne de mon fichier test qui était un repère du numéro de colonne du fichier à exploiter la macro ne pouvait pas trouver le chemin colonne B Mille mercis

J'ai testé sur mon PC la routine s'arrête du l'emplacement en Gras ci-dessous Bruno Sub CORRECTION_LinkCreateTranspo() Dim Emplacement As String, Word As Variant, Row As Range With Worksheets("Feuil1") For Each Row In .Rows("2:" & .Cells(.Rows.Count, 3).End(xlUp).Row) With...

Bonjour Merci pour vos réponses Je vais essayer dans la journée de tester le code proposé En ce qui concerne "si je remplace usb par ink dans la routine elle plante" c'est hélas une erreur de rédaction de ma part j'aurai du écrire "si je remplace ink par url dans la routine elle plante"...

Bonjour Question pour un spécialisate en VBA EXCEL J’ai adapté une macro VBA trouvé sur un site Elle ne fonctionne pas comme je le souhaite Soit le fichier excel en pièce jointe Col A = Nom Souhaité d’url Col B = Destination pour les raccourcis à Générer ( user \BRUNO2\ à changer dans cette...

Bonjour Je suis ancien correspondant Système Information