Comment remplacer "xlLow" par un chiffre du genre "-4152"

Résolu
yao.chris Messages postés 95 Statut Membre -  
yao.chris Messages postés 95 Statut Membre -
Bonjour les amis,

ma fonction "xlLow" ne fonctionne pas dans ma macro, et je me souvient que l'on peut remplacer "xlLow" par un chiffre du genre "-4152" (pour exemple).
voici mon code:
Sheets("Facture").Cells(i_max, 3).VerticalAlignment = xlLow

Merci pour votre aide les amis.

Bonne journée.

11 réponses

  1. ccm81 Messages postés 11033 Statut Membre 2 434
     
    Bonjour

    Es tu sûr de la syntaxe?
    As tu essayé xlBottom

    Cdlmnt
    0
  2. eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
     
    Bonjour,

    xlLow = -4134 (&HFFFFEFDA)
    Mais toi c'est xlBottom = -4107 que tu as besoin j'ai l'impression...

    eric
    0
  3. yao.chris Messages postés 95 Statut Membre 2
     
    Merci pour votre réactivité.

    Rien a faire quand je met le Bottom, au lancement de la macro je reçois le message d'erreur suivant :
    "Impossible de définir la propriété HorizontalAlignment de la classe Range

    voici le code que j'ai mis:
    Sheets("Facture").Cells(i_max, 3).HorizontalAlignment = xlBottom

    Merci pour votre Aide
    0
  4. ccm81 Messages postés 11033 Statut Membre 2 434
     
    Tu avais parlé d'alignement vertical
    Sheets("Facture").Cells(i_max, 3).VerticalAlignment = xlBottom
    0
  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. yao.chris Messages postés 95 Statut Membre 2
     
    oui mes excuses, je parle bien d'alignement vertical mais ça ne fonctionne pas.
    que ce passe t'il ??

    Sheets("Facture").Cells(i_max, 3).VerticalAlignment = xlBottom

    Merci à vous.
    0
  7. ccm81 Messages postés 11033 Statut Membre 2 434
     
    1. Est ce que la feuille "Facture" existe
    2. Que vaut la variable i_max lors du plantage ?
    0
  8. yao.chris Messages postés 95 Statut Membre 2
     
    oui la feuille "Facture" existe bien et le i_max est correcte.
    Après avoir enregistré, fermé et ré-ouvert le classeur, cela fonctionne bizarrement. Lol
    c'est cette ligne qui fait planter la macro.
    Sheets("Facture").Cells(i_max, 3).HorizontalAlignment = xlLow
    0
  9. ccm81 Messages postés 11033 Statut Membre 2 434
     
    Pour la propriété
    HorizontalAlignment
    je ne pense pas que xlLow soit une valeur correcte
    tu as par contre à disposition
    xlGeneral, xlLeft, xlCenter, xlRight, xlFill, xlJustify

    Une question : que veux tu y faire à cette cellule ?
    0
  10. yao.chris Messages postés 95 Statut Membre 2
     
    la macro envoi les consommations d'un client dans les cellules pour l'impression du ticket de caisse et je voulait mettre en forme la cellule de destination comme suite :
    en gras, alignée en bas et aligné à droite.

    Tous marche impeccable maintenant.

    Merci beaucoup pour votre aide.
    Bonne journée.
    0
  11. ccm81 Messages postés 11033 Statut Membre 2 434
     
    Sheets("Facture").Cells(i_max, 3).HorizontalAlignment = xlRight
    Sheets("Facture").Cells(i_max, 3).VerticalAlignment = xlBottom
    Sheets("Facture").Cells(i_max, 3).FontStyle = "Gras"

    RQ. Tu peux récupérer ce code avec l'éditeur/enregistreur de macro
    Outils/macro/Nouvelle macro
    tu fais ta mise en forme
    puis Outils/Macro/arrêter l'enregistrement
    et ton code est dans un Module
    Cdlmnt
    0
  12. yao.chris Messages postés 95 Statut Membre 2
     
    c'est noté.

    Merci beaucoup pour votre aide.
    Bonne journée.
    0