Y
Yochma
Guest
Bonjour a toutes et a tous!!
Pourriez vous svp me donner un petit coup de pouce car la je nage snifff!!!!
Voila mon soucil : J'aimerai dans le fichier joint à ce message pouvoir en feuille "A" en fonction de la valeur inscrite en cellule "A1" venir copier coller en "A5" une des plage de cellule coloré situé sur la feuille "Base" et ceci par macro.
Par exêmple :
A1 = 1 donc collage en A5 de la plage jaune de la feuille Base
A1 = 2 donc collage en A5 de la plage verte de la feuille Base
A1 = 3 donc collage en A5 de la plage orange de la feuille Base
La ou çà se complique c'est que j'aimerai pouvoir faire de même pour n'importe quelle feuille que je rajouterai au fil du temps par exemple une feuille "B" avec les plages coloré de la feuille "base" en fonction de la valeur situé dans la celule "A1" de la feuille "B".
Moi je n'ai pas le niveaui pour faire ceci encore mais je vosu remercie par avance pour tous ceux qui souhaiterons collaborer à résoudre mon "Souchi"
Merci par avance et longue vie au forum
Yochma
Ps : J'ai penser déja a un code de ce genre la ( voir ci dessous) mais je ne sais pas comment revenir sur ma feuille initiale ou les données doivent etre coller snif!!!
Sub Test6()
Select Case Range("a1")
Case 1
ActiveWindow.ScrollWorkbookTabs Position:=xlLast
Sheets("Base").Select
Range("a1:b12").Select
Selection.Copy
ActiveWindow.ScrollWorkbookTabs Position:=xlFirst
Sheets("A ").Select **** Comment faire varier ce repositionnement??**
Range("A5").Select
ActiveSheet.Paste
Case 2
Case 3
End Select
End Sub
Pourriez vous svp me donner un petit coup de pouce car la je nage snifff!!!!
Voila mon soucil : J'aimerai dans le fichier joint à ce message pouvoir en feuille "A" en fonction de la valeur inscrite en cellule "A1" venir copier coller en "A5" une des plage de cellule coloré situé sur la feuille "Base" et ceci par macro.
Par exêmple :
A1 = 1 donc collage en A5 de la plage jaune de la feuille Base
A1 = 2 donc collage en A5 de la plage verte de la feuille Base
A1 = 3 donc collage en A5 de la plage orange de la feuille Base
La ou çà se complique c'est que j'aimerai pouvoir faire de même pour n'importe quelle feuille que je rajouterai au fil du temps par exemple une feuille "B" avec les plages coloré de la feuille "base" en fonction de la valeur situé dans la celule "A1" de la feuille "B".
Moi je n'ai pas le niveaui pour faire ceci encore mais je vosu remercie par avance pour tous ceux qui souhaiterons collaborer à résoudre mon "Souchi"
Merci par avance et longue vie au forum
Yochma
Ps : J'ai penser déja a un code de ce genre la ( voir ci dessous) mais je ne sais pas comment revenir sur ma feuille initiale ou les données doivent etre coller snif!!!
Sub Test6()
Select Case Range("a1")
Case 1
ActiveWindow.ScrollWorkbookTabs Position:=xlLast
Sheets("Base").Select
Range("a1:b12").Select
Selection.Copy
ActiveWindow.ScrollWorkbookTabs Position:=xlFirst
Sheets("A ").Select **** Comment faire varier ce repositionnement??**
Range("A5").Select
ActiveSheet.Paste
Case 2
Case 3
End Select
End Sub