Dernière activité de job75

  • job75
    job75 a répondu à la discussion XL 2021 création d'étiquettes.
    Pour finir encore une simplification du code : Sub Etiquettes(souche$) Dim s1 As Shape, s2 As Shape, T As Range, i&, j& Set s1 =...
  • job75
    job75 a répondu à la discussion XL 2021 création d'étiquettes.
    La feuille "Etiquettes" n'était pas nécessaire, on peut ajouter à chaque fois une feuille auxiliaire : Private Sub...
  • job75
    job75 a répondu à la discussion XL 2021 création d'étiquettes.
    Bonjour le forum, Il y avait une petite erreur : le prix de 35 € s'affichait à 25 €, j'ai corrigé le fichier du post #38. A+
  • job75
    Bonjour Vins74000, Créez plutôt votre propre discussion et joignez le fichier (sans données confidentielles) en précisant la cellule à...
  • job75
    Bonjour Titof06, le forum, Ce n'est pas Excel qui fait cela mais Windows. Il suffit de donner aux fichiers un nom commençant par une...
  • job75
    job75 a répondu à la discussion XL 2021 création d'étiquettes.
    Bonjour le forum, Il suffit de construire automatiquement la liste de validation avec cette macro dans la feuille "Créations" : Private...
  • job75
    job75 a répondu à la discussion XL 2021 création d'étiquettes.
    C'est normal car la largeur 10,5 cm des Shapes est trop grande, Excel applique un zoom < 100 pour ajuster à une page en largeur. Dans...
  • job75
    job75 a répondu à la discussion XL 2021 création d'étiquettes.
    D'où mon post #22. Les marges étant toutes nulles je vous laisse vérifier les dimensions des étiquettes. Chez moi sur HP 2540 elles...
  • job75
    job75 a répondu à la discussion XL 2021 création d'étiquettes.
    Avec cette solution on imprime les pages une par une et à chaque fois on supprime les étiquettes. Cela permet d'avoir toutes les marges...
  • job75
    job75 a répondu à la discussion XL 2021 création d'étiquettes.
    Bonjour le forum, Bien sûr puisque j'ai centré les pages horizontalement et verticalement à l'impression (menu Mise en page => Marges)...
  • job75
    job75 a répondu à la discussion XL 2021 création d'étiquettes.
    Bonjour le forum, Chez moi les sauts de pages créés permettent de limiter l'impression de la feuille "Etiquettes" à 16 étiquettes par...
  • job75
    job75 a répondu à la discussion XL 2021 création d'étiquettes.
    Pour forcer la copie j'ai ajouté 2 boucles Do/Loop, dites-moi si ça va mieux : Do On Error Resume Next...
  • job75
    job75 a répondu à la discussion XL 2021 création d'étiquettes.
    Bonjour AIGOIN, le forum, Voyez le fichier joint et le code de la feuille "Créations" : Option Compare Text 'la casse est ignorée Dim F...
  • job75
    Bonsoir à tous, Ça prend du temps mais MS fini par mettre de l'ordre dans ses bugs. A+
  • job75
    job75 a répondu à la discussion XL pour MAC Compter des mots / des noms.
    Bonjour Phil.Hip, le forum, En BX3 à tirer sur BY3 : =NB.SI.ENS($E$3:$E$100;BX$1;$J$3:$J$100;$AO3;$K$3:$K$100;$AP3) En BZ3 à tirer sur...
Retour