A
ar Morbreizher
Guest
Bonjour tout le monde,
J'ai un classeur de deux feuilles. Sur la première, j'ai un tableau avec une liste de nom et en double-cliquant sur les n° d'enregistrement, j'arrive sur une fiche à compléter, modifier (elle reprend des indications du tableau)
Pour la liste, j'utilise (merci Michel) :
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, cancel As Boolean)
If Not Intersect(Target, Range("a6:a29")) Is Nothing Then
Sheets("Fiche").Range("b3").Value = Target
ShowError = True 'False
affichage
End If
End Sub
J'ai, de plus, déverrouillé les cellules A6 à A29 et protégé la feuille.
PROBLEME N° 1 : Je voudrais maintenant que lorsqu'on double-clique ailleurs que sur ma zone, il n'y ait aucun message d'erreur et qu'on renvoie à A1
Pour ma fiche(2ème feuille), je renseigne des cases par double-click (choix = 2 ou 3 cases)
Selon que la croix se situe dans l'une ou l'autre, j'enregistre une valeur de 1 à 3 ==> pièce jointe.
PROBLEME N° 2 : Je ne pense pas avoir fait le bon choix car je voudrais qu'en double-cliquant sur une case, l'autre (ou les deux autres) se vident automatiquement.
PROBLEME N° 3 : Autre chose (j'abuse !!), je voudrais qu'une case sur la ligne DONC soit obligatoirement cochée si le 2ème critère est "bon" et ne puisse être cochée si le critère est "pas bon" (ou pas coché)
Voilà, je vous remercie d'avance pour votre aide.
A +
J'ai un classeur de deux feuilles. Sur la première, j'ai un tableau avec une liste de nom et en double-cliquant sur les n° d'enregistrement, j'arrive sur une fiche à compléter, modifier (elle reprend des indications du tableau)
Pour la liste, j'utilise (merci Michel) :
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, cancel As Boolean)
If Not Intersect(Target, Range("a6:a29")) Is Nothing Then
Sheets("Fiche").Range("b3").Value = Target
ShowError = True 'False
affichage
End If
End Sub
J'ai, de plus, déverrouillé les cellules A6 à A29 et protégé la feuille.
PROBLEME N° 1 : Je voudrais maintenant que lorsqu'on double-clique ailleurs que sur ma zone, il n'y ait aucun message d'erreur et qu'on renvoie à A1
Pour ma fiche(2ème feuille), je renseigne des cases par double-click (choix = 2 ou 3 cases)
Selon que la croix se situe dans l'une ou l'autre, j'enregistre une valeur de 1 à 3 ==> pièce jointe.
PROBLEME N° 2 : Je ne pense pas avoir fait le bon choix car je voudrais qu'en double-cliquant sur une case, l'autre (ou les deux autres) se vident automatiquement.
PROBLEME N° 3 : Autre chose (j'abuse !!), je voudrais qu'une case sur la ligne DONC soit obligatoirement cochée si le 2ème critère est "bon" et ne puisse être cochée si le critère est "pas bon" (ou pas coché)
Voilà, je vous remercie d'avance pour votre aide.
A +