VBA, mise à jour autom. des cellules si rajout lignes
Bonsoir à tous, vous qui excellez...,
Je travaille sur un classeur avec des actions (via vba) qui doivent s'appliquer sur des cellules précises. Mon problème est que si je rajoute ou supprime des lignes à mon classeur, les références des cellules de mes codes VBA se retrouvent décalées. Comment faire en sorte qu'elles se mettent à jour automatiquement?, j'ai essayé sans succès de placer le signe $ comme dans les formules.
Je suis sure que quelques experts connaissent le bout de code qui fera à ma place et d'un bloc toutes les mises à jour lorsque je rajouterai ou supprimerai des lignes.
Pour exemple, avec le morceau de code suivant si je supprime la ligne 67 de mon classeur, mon code ne pourra plus s'appliquer.
[Private Sub Worksheet_SelectionChange(ByVal Target As Range)
End Sub]
J'espère m'être fait comprendre,
Merci d'avoir pris le temps de me lire et de me répondre.
Bonne soirée.
Bonsoir,
Avant de te lancer dans des choses compliquées, as-tu essayé de donner un nom à tes différentes cellules ...???
Une fois "étiquettées" avec un nom ... peut importe leur localisation ... ta macro fonctionnera ...
Bonsoir,
Merci pour ton retour rapide.
Je ne suis pas très douée en programmation, je suppose que tu veux dire que je dois déclarer une variable?
Peux-tu m'aider là dessus?
Bonne soirée
Bonjour,
Tu peux tester le code suivant :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Target.Address <> "$L$68" Then Exit Sub
If UCase(Target) = "NON" Then
Range("$B$70:$Z$74").Font.Color = RGB(255, 255, 255)
Range("$B$70:$Z$74").Borders.ColorIndex = 2
Rows(Target.Row + 1 & ":" & Target.Row + 7).RowHeight = 5
Else
Range("$B$70:$Z$74").Font.Color = xlNone
Range("$B$70:$Z$74").Borders.ColorIndex = xlNone
Rows(Target.Row + 1 & ":" & Target.Row + 7).RowHeight = 15
End If
End SubBonsoir,
Je reprends du service, merci pour ton aide, j'essaie ton code mais ça ne marche pas.
Lorsque je supprime la ligne 67 de mon classeur, le décalage ne se fait pas. De plus, la couleur d'écriture est passée à bleu ciel je ne comprends pas pourquoi.
Cdlt,
Bonjour Mano,
Peux-tu joindre ton fichier avec ton prochain message ...
Merci d'avance .. cela évitera certaines incompréhensions ...
Bonsoir,
Effectivement ce sera mieux avec le fichier. C'est un document professionnel, je l'ai "relooké".
Merci pour ton indulgence face à autant d'ignorance...je fais ce que je peux avec ce que je sais; il y a surement des possibilités de simplification dans mes codes.
Bonne soirée,
Bonsoir,
Dès que j'ai un petit moment ... je reprends ton fichier ...
Je peux déjà te dire que macro et cellules fusionnées ne font jamais bon ménage ...
Bonjour,
A vrai dire ... ton fichier est ... déroutant ...
Mais bon ... Une chose après l'autre ...
Peux-tu commencer par jouer au Oui - Non dans ta cellule L68 ...???
bonjour,
Merci pour ton retour. Je n'ai pas de délai pour le terminer, tu as déjà la gentillesse de t'intéresser à mon projet.
Je vais le tester dans la journée, je reviens vers toi ASAP.
Bonne journée
Re,
Tiens moi au courant de tes tests ... et si tu pouvais ajouter quelques données (non confidentielles) cela aiderait à la bonne compréhension de tes contraintes ...
Bonsoir,
J'ai regardé ton fichier, effectivement mes cellules se masquent lorsque j'inscris NON, c'est OK.
Si je reviens à OUI, les lignes réapparaissent mais l'écriture à l'intérieur des cellules est bleue ciel.
Les opérateurs en production vont utiliser et enregistrer des données; supprimer des lignes, en rajouter (en dehors de celles qui ont un code).
C'est là ou ça ne va plus. Si je supprime la ligne 67 par ex, mon code ne fonctionne plus du fait du décalage.
Je te mets le fichier en V1
Merci,
A+
Re-
Merci bcp pour ta réactivité, c'est exactement ce que je cherche, je vais tenter de comprendre et de transposer le code sur mon fichier original.
Je te tiens au courant rapidement.
Bonne soirée.
Re,
Content que cela corresponde à ton attente ...
Merc pou tes remerciements ...