Résultats de la recherche

Bonjour, déprotégé en moins de trente secondes sur un autre forum …

Re : Recherche équivalant à LockXLS gratuit Bonjour, déprotégé en moins de trente secondes sur un autre forum …

Bonjour, une variante un peu plus directe : Sub Demo() With Feuil1.Cells(3).End(xlDown) R& = .Parent.Cells(1).CurrentRegion.Rows.Count If .Row > 3 And .Row < R Then .Offset(-2).Resize(3).AutoFill .Offset(-2).Resize(R - .Row + 3) End With End...

Bonjour, les API / ActiveX Windows n'existent pas sous MAC, et pour cause ! Seule solution sur MAC : émulation Windows … _______________________________________________________________________________ Je suis Paris, Charlie, Bruxelles, …

Bonjour, normal car le code de la « zone bleue » n'est pas bon ! Il cherche la cellule en dessous de la dernière cellule utilisée de la colonne … Pour sélectionner la cellule en dessous de la dernière valeur de la colonne : Sub Demo() Feuil1.UsedRange.Columns(7).Find("*", , , , ...

Je ne vois pas le rapport, le disque dur est accessible quel que soit le mode … Avant de lancer cette discussion, un test a-t-il été effectué au moins ?

Bonjour, normalement oui car le logiciel n'a aucun rapport avec la version d'Excel …

Duplication des piece jointes a chaque envoi VBA EXCEL

Le minimum (de correction) est de mettre un lien sur ton autre discussion afin de voir où tu en es …

Il s'agit de ta propre discussion créée sur un autre forum ‼ Donc sans voir ton lien, je me dis en découvrant cette discussion ici « tiens, j'ai vu la même sur un autre forum et donc je verrais demain sur l'autre forum, je préviens juste les autres ici …»

Déjà bien avancé sur un autre forum ‼

Déjà bien avancé sur un autre forum ‼

Bonjour ! Le classeur contenant le code étant aussi localisé dans le dossier du classeur de destination, il n'y a pas besoin de changer le chemin : [highlight]ThisWorkbook.Path & "\ClasseurDestination.xlsx"[/code] …

Bonjour. Quel est l'intérêt d'ouvrir cette discussion en double ?‼ (Edit : en fait ici en triple ‼ ) Comme du reste la poster sur plusieurs forums ! Alors ?

Bonjour, et pourquoi pas via un simple filtre ?! Ou encore via un filtre avancé …

Bonjour, via un simple Rechercher / Remplacer ! Mais il vaudrait mieux corriger en amont la mauvaise procédure d'importation en indiquant juste le point comme séparateur décimal …

Avec le travail effectué en amont, pour enregistrer chaque fiche il suffit de boucler sur les numéros de lignes des fiches de la feuille Inventaire et pour chaque fiche mettre à jour la cellule _No puis enregistrer en pdf : Sub Tout_Enregistrer_en_PDF() Const DOSSIER =...

Le changement de nom d'une feuille n'a pas d'incidence car j'utilise son CodeName et non pas son nom … Copier le code suivant dans le module de Feuil9 (Inventaire) : Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = [_No].Address Then With Feuil1...

J'ai fait l'erreur de copier/coller depuis le forum et cela a ajouté initialement une balise couleur du forum dans le code ! Depuis le post #16 a été corrigé (t'as dû copier depuis le mail). Edit : et dans la feuille Fiche de poste la donnée de la cellule B1 est depuis passée en C1 …

Changement de voie ! Au préalable, dans la configuration de la feuille modèle désactiver l'affichage des zéros … Toujours dans la feuille modèle, placer les logos comme s'ils étaient permanents et ils doivent recouvrir l'affichage de la cellule située en dessous. Lors de l'impression, selon...