Modifier petite macro après fusion de celulle

gourdin · 28 Avril 2009

Bonjour,

Une petite macro (merci le forum) fonctionnait très bien mais je dois fusionner 2 celulles et la macro ne fonctionne plus.

Un petit exemple explicatif en fichier joint.

Merci de votre aide

gourdin · 28 Avril 2009

Re : Modifier petite macro après fusion de celulle

Gyruss à dit:
Bonsoir Gourdin,

Un essai en corrigeant ton énoncé qui ne me semblait pas clair.

Dis si c'est bon. Je suis un peu rouillé 😀

C'est parfait. MERCI BEAUCOUP
(par contre je ne comprends pas très bien le code)

ROGER2327 · 28 Avril 2009

Re : Modifier petite macro après fusion de celulle

Bonsoir

Une autre solution :

Code:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   Range("E4,G4").Value = ""
   If Target.Column <> 3 Then Exit Sub
   Range("E4").Value = Target.Offset(0, -1)
   Range("G4").Value = Target.Offset(0, -1).Offset(1, 0)
End Sub

ROGER2327

gourdin · 29 Avril 2009

Re : Modifier petite macro après fusion de celulle

roger2327 à dit:

bonsoir

une autre solution :

Code:

private sub worksheet_selectionchange(byval target as range)
   range("e4,g4").value = ""
   if target.column <> 3 then exit sub
   range("e4").value = target.offset(0, -1)
   range("g4").value = target.offset(0, -1).offset(1, 0)
end sub

roger2327

merci c'est parfait egalement

Modifier petite macro après fusion de celulle

gourdin

XLDnaute Impliqué

Pièces jointes

gourdin

XLDnaute Impliqué

ROGER2327

XLDnaute Barbatruc

gourdin

XLDnaute Impliqué

Discussions similaires

Modifier petite macro après fusion de celulle

gourdin

XLDnaute Impliqué

Pièces jointes

gourdin

XLDnaute Impliqué

ROGER2327

XLDnaute Barbatruc

gourdin

XLDnaute Impliqué

Discussions similaires

Privacy & Transparency

Privacy & Transparency