apercu macro

[Edouard]

Bonsoir le forum

Je viens de mettre au point une macro qui réalise automatiquement un aperçu avant impression quel que soit le nombre de lignes écrites, d’une feuille prévue (format formules bordures) pour 150 ;
Exemple 10 lignes écrites sur 150 ; les 10 seulement apparaîtrons à l’écran.

Malheureusement dans cette même feuille si j’efface ou si je copie/coller plus d’une cellule à la fois ; « beugue «

Si quel qu’un peut me dépanner, cela me m’arrangerait beaucoup ;

 

[arnaud]

salut,
le problème c'est que vu que tu as protégé les feuilles de ton classeur, on ne peut ni effacer ni coller dans tes feuilles donc impossible de reproduire le bug......

 

[Edouard]

Bonjour Arnaud

Si par exemple tu clic sur feuille"zone E" 5/7 son remplies , si tu fait apercu avant impression les 5 sont visibles;

Par contre si tu sélectionnes un nom et un prénom pour les effacer là tu verras le bug...

a+ bonne journnée

 

[arnaud]

re,

cela vient tout simplement du fait que tu ne peut regarder la propriété Value quand l'objet Range pointe sur plusieurs cellules.

rajoute une gestion d'erreur comme ça cela t'évite tout problème.

Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo erreur
If Target.Value = Empty Then Exit Sub
If Target.Column = 3 Then
Target.Value = Application.Proper(Target.Value)
ElseIf Target.Column = 2 Then
Target.Value = UCase(Target.Value)
End If
Exit Sub
erreur:
End Sub

 

[Edouard]

Salut Arnaud

J'y connait rien en macro je travaille par comparaison;
Tes instructions je les rajoute où dans un module ? dans les feuilles ?

a+

 

[arnaud]

re,
j'ai juste modifié ton code qui existai déja donc il se trouve dans le code de plusieurs de tes feuilles mais je ne sai plus lesquelles.

 

[Edouard]

Ok merci ca marche