Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

apercu macro

  • Initiateur de la discussion Edouard
  • Date de début
E

Edouard

Guest
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 ;
 

Pièces jointes

  • CCC5.zip
    41 KB · Affichages: 18
A

arnaud

Guest
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......
 
E

Edouard

Guest
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
 
A

arnaud

Guest
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
 

Discussions similaires

Réponses
4
Affichages
1 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…