XL 2013 Mise en forme cellules + Ecriture

fanfan38

XLDnaute Barbatruc

• 8 Novembre 2021

• #2

Bonjour
C'est pas clair et en plus il y a un mot de passe pour accéder au macro

A+ François

 

Vote positif 0 Vote négatif

Y

YANOU38

XLDnaute Occasionnel

• 9 Novembre 2021

• #3

Bonjour fanfan38, le forum,
Mon semblant de macro ajoute des bordures + du texte sur une zone déterminée, voila où j'en suis... 🙁
(cela à le mérite de montrer un début de résultat voulu)
Elle ne prend pas en compte un choix de zone (emplacement, nombre de lignes...).
Merci pour votre aide

 

Pièces jointes

• Nomenclature.xlsm

  30.3 KB · Affichages: 1

Vote positif 0 Vote négatif

Y

YANOU38

XLDnaute Occasionnel

• 9 Novembre 2021

• #4

Re,
Il faut peut-être passer par une Input box, mais je ne maîtrise pas.
Merci pour votre aide.

 

Vote positif 0 Vote négatif

Y

YANOU38

XLDnaute Occasionnel

• 10 Novembre 2021

• #5

Bonjour à tous,
Voila où j'en suis :
- Pour ajouter les bordures sur ma 1ière sélection :

VB:

Sub Macro1()
With Selection.Borders(xlDiagonalDown)
    .Weight = xlThin
End With
With Selection.Borders(xlDiagonalUp)
    .Weight = xlThin
End With
End Sub

- Pour ajouter "voir poste" sur ma 2ième sélection" :

VB:

Sub Macro2()
Selection = "voir poste"
End Sub

- Pour ajouter "POSTE" sur ma 3ième sélection" :

VB:

Sub Macro3()
Selection = "POSTE"
End Sub

1ier problème => Je n'arrive pas à faire le lien pour la valeur à mettre dans la colonne AJ
2ième problème => Concaténer ces Macros pour ne faire qu'une sélection de zone (en jaune) et que tout s'enchaine.

Merci pour votre aide.

 

Pièces jointes

• Nomenclature.xlsm

  24.5 KB · Affichages: 4

Vote positif 0 Vote négatif

Y

YANOU38

XLDnaute Occasionnel

• 10 Novembre 2021

• #6

Re,
Pour ajouter la valeur de "B9" sur ma 4ième sélection :

VB:

Sub Macro4()
Selection = "=$B$9"
End Sub

Il me reste toujours le problème pour concaténer ces Macros pour ne faire qu'une sélection de zone (en jaune) et que tout s'enchaine.
Je suis conscient de mon niveau en VBA, sans votre aide pour passer de plusieurs Macros "Artisanales" à une Macro "Pro", je n'y arriverai certainement pas.
Merci à tous pour votre aide.

 

Pièces jointes

• Nomenclature-1.xlsm

  24.8 KB · Affichages: 1

Vote positif 0 Vote négatif

Y

YANOU38

XLDnaute Occasionnel

• 16 Novembre 2021

• #7

Bonjour à tous,
Une petite avancée...
Toutes les actions se font en une seule fois, mais cela ne prend pas en compte une sélection.
Merci pour votre aide.

 

Pièces jointes

• Essai.xlsm

  23.7 KB · Affichages: 0

Vote positif 0 Vote négatif