macro a l'ouvertute d'une feuille

[Marion]

Bonjour au forum

quelle galère, je n'y arrive pas

a l'ouverture d'une feuille (saisie quantite) je déclache une macro 'macrotest la c'est bon.

cette macro a pour but de demasque la colonne B d'aller sur la feuille base de copier en a6 a1000 de revenir sur la feuille (saisie de quantite) de coller en b5 et d'efffectuer le trie

ça ne marche pas mais alors pas du tout.


de l'aide s'il vous plait.

Merci de vos réponse

je joins un fichier

A+Marion [file name=marion11.zip size=8746]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/marion11.zip[/file]

 

[ChTi160]

re
c'est la dernière promis Lol
Thierry va être content re Lol
la version Source et Cible Enfin

Private Sub Worksheet_Activate()
Dim Source As Range
Dim Cible As Range
With Worksheets('base')
Set Source = .Range('a6:a' & .Range('A65536').End(xlUp).Row)
Set Cible = Worksheets('saisie quantite').Range('B5:B' & source.Rows.Count + 4)
End With
Application.ScreenUpdating = False
With Worksheets('saisie quantite')
'.Columns('B:B').EntireColumn.Hidden = False

Cible = Source.Value
.Range('B5:B' & Range('B5').End(xlDown).Row).Sort Key1:=.Range('B5'), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
.Columns('B:B').EntireColumn.Hidden = True
End With
Worksheets('base').Select
Application.ScreenUpdating = True
End Sub

Amicalement
Jean Marie

 

[Hellboy]

Bonjour Marion & ChTi160

Je crois qu'il n'y a plus rien a rajouter à part que Basile à corriger le tir le plus près de ce que tu avait demandé et de plus à utilisé ton code en guise de référence à tes connaissances. 😉

Phil (et non pas Fil) :huh:

 

[Marion]

Bonsoir le forum
Merci beaucoup pour toutes vos réponses.

Je suis désolée pour le retard mais j'étais en déplacement.


je pense trouver mon bonheur dans tout ça

vous étes des champions

Gros bisous a vous tous


A+Marion