Petite modif sur macro....

Christian0258

XLDnaute Accro
Bonjour à tout le forum,

Je souhaiterais votre aide afin de modifier une macro...
voir fichier joint...

Merci pour votre aide si précieuse.
Bien amicalement,

Christian
 

Pièces jointes

  • Modif sur Inserer formule sous condition de tototiti2008.xlsm
    25.9 KB · Affichages: 40

pierrejean

XLDnaute Barbatruc
Bonjour Christian

En espérant avoir compris

Code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$F$10" And Target = "" Then Columns("F").Delete
If Target.Rows.Count > 1 Or Target.Columns.Count > 1 Then Exit Sub
If Target.Row < 11 Or Target.Column < 6 Or Target.Column > 31 Or Target.Column Mod 2 = 0 Then Exit Sub
If Cells(9, Target.Column + 1).Value <> "ò" Then Exit Sub
Target.Offset(, 1).FormulaR1C1 = "=IF(RC[-1]="""","""",RC[-1])"
End Sub
 

Christian0258

XLDnaute Accro
Re, le forum, pierrejean

Merci, pierrejean , pour ton aide.
En fait je souhaite supprimer la colonne F un fois pour toute, actuellement si je supprime cette colonne,
la macro ne fonctionne plus...
Si tu tapes un chiffre dans une des colonnes ( titre "associé avec "), la formule, pour copier ce chiffre, ne se place pas dans sa colonne de droite titre "ò".
A te lire.
Merci
Christian
 

Statistiques des forums

Discussions
312 894
Messages
2 093 381
Membres
105 713
dernier inscrit
Karimov