M
Moa
Guest
Salut Celeda !
Tout d'abord un gros merci, pour avoir pris le temps de t'arrêter sur mon travail.
J'apprécie tes suggestions.
Tu m'a fait une feuille superbe, qui me plaît beaucoup.
Donc, j'ai voulu, en faire une copie et la mettre dans mon classeur, pour remplacer la mienne.
Et il y a vraissemblablement un hic...hihihi!!!
Private Sub Worksheet_Activate()
With ActiveWindow
.DisplayHorizontalScrollBar = False
.DisplayVerticalScrollBar = True
End With
End Sub
ICI, Excel me met un message d'erreur "Il ne peut rien y avoir après End".
Option Explicit
Dim TogRange As Range
J'ai vérifié, et ce que je ne comprends pas, c'est pourquoi, il y a un prob dans mon classeur et pas dans le tien.
Car, si il devait y avoir un conflit, ce serait au niveau de Workbook, mais pas d'une feuille.
Enfin, bref.Si tu as une idée du problème...lol
Encore merci de ce superbe exemple, qui à mon avis pourrait intéresser d'autres personnes de ce forum.
@ Bientôt
Moa
Tout d'abord un gros merci, pour avoir pris le temps de t'arrêter sur mon travail.
J'apprécie tes suggestions.
Tu m'a fait une feuille superbe, qui me plaît beaucoup.
Donc, j'ai voulu, en faire une copie et la mettre dans mon classeur, pour remplacer la mienne.
Et il y a vraissemblablement un hic...hihihi!!!
Private Sub Worksheet_Activate()
With ActiveWindow
.DisplayHorizontalScrollBar = False
.DisplayVerticalScrollBar = True
End With
End Sub
ICI, Excel me met un message d'erreur "Il ne peut rien y avoir après End".
Option Explicit
Dim TogRange As Range
J'ai vérifié, et ce que je ne comprends pas, c'est pourquoi, il y a un prob dans mon classeur et pas dans le tien.
Car, si il devait y avoir un conflit, ce serait au niveau de Workbook, mais pas d'une feuille.
Enfin, bref.Si tu as une idée du problème...lol
Encore merci de ce superbe exemple, qui à mon avis pourrait intéresser d'autres personnes de ce forum.
@ Bientôt
Moa