Contenu récent par CHALET53

Bonjour Job75 C'est parfait Merci Cordialement Marc

Bonjour, Je joins un fichier pour illustrer mon propos En B6:C7, j'ai une liste de noms avec une adresse internet attenante. En réalité, la liste est sur une autre feuille En J4, je sélectionne un individu ce qui amène en K4 l'adresse Internet correspondante Un changement de nom entraine un...

Il est éteint tous les soirs (à minima) Cela me paraissait complexe à la lecture de cette page https://tt-hardware.com/pc/comment-rebooter-son-pc-facilement-sous-windows-10/#:~:text=Rebooter%20ou%20faire%20un%20reboot,du%20jour%20de%20l'achat

Je n'ai pas fait de Reboot Un reboot ne semble pas anodin (d'après ce que je lis) Je vais y réfléchir Encore merci

Re, Autre bizarrerie : Si je mets en première instruction : a = "ROSPIAJACPIAJEADAV" Après exécution de cette première instruction (en pas à pas) Curseur sur la variable a : Rien Si je remplace le dernier J (JEADAV) par n'importe quelle lettre T par exemple Après exécution, le curseur sur la...

Re, Merci pour cette précision Toutefois, je ne comprends pas pourquoi lorsque je remplace le J par un M. L'exécution pas à pas me permet de constater (en positionnant le curseur sur la variable secd, que le contenu attendu est bien présent Et lorsque j'exécute pas à pas avec le prénom JEANNE...

Bonjour, J'ai un souci avec le petit programme présent dans le fichier joint Il faut l'exécuter en pas à pas Il se passe un truc bizarre avec la lettre majuscule de la variable prnmM : JEANNE L'exécution de ce programme met la variable secd à blanc Si je remplace la première lettre du prénom...

Bonjour Patrick Merci pour cette explication. En effet, dans un module, j'avais nommé un programme : selection Encore merci Cordialement

Bonjour, J'ai un souci avec ce petit programme Sub Macro1() Range("A1").Select With Selection.Font .Name = "Calibri" .Size = 15 End With Selection.ColumnWidth = 30 End Sub Dans le fichier joint, il fonctionne très bien. Ce même programme dans un autre fichier...

Super Merci Cordialement

Re, Il doit me manquer quelque chose : J'ai modifié l'instruction comme ceci : Sheets("Feuil2").Range("A1").Resize(UBound(tb2, 2), 1) =tb2 Il ne se passe rien. Si vous pouviez me préciser ce sui cloche ... Merci

Bonjour A partir du fichier exemple ci-joint, je sais mettre les données à traiter en tableau (tablo dans l'exemple) J'apporte des modifications (bidon dans l'exemple) et j'écris l'ensemble dans un nouveau tableau tb2 A la fin, l'instruction suivante ...

Re Merci pour vos interventions Avec les cellules cibles au format texte, cela fonctionne bien Encore merci

Bonjour, Je n'avais pas exécuté la macro : c'était volontaire Vous pouvez voir qu'après l'exécution la date pour C devient en Feuille Extract_non_traité 10/12/1913 (12/10/1913 la bonne date avant) Alors que pour D elle reste à 04/12/1888 . Elle n'a pas subi le même sort que pour C : elle est...

Bonjour Les données sur la feuille Extract sont issues du web Le format des dates est Standard pour toutes les lignes sur cette extraction Lorsque j'exécute le petit programme (module 1), tout est bien recopié sauf la date de l'individu C qui est transformée de 12/10/1913 à 10/12/1913 Je sais...