Bonjour,
 
Voila je suis un gros noob en vba, et j'aimerais prendre la valeur d'une cellule se trouvant sur une autre page. La page s'appelle parameters. Et la cellule qui m'interaisse se trouve un cran a droite de la cellule enregistré dans piegenom.
 
Pourrez vous m'aider PP?
 
 
  Worksheets("Parameters" ).Visible = True
  ActiveSheet.Name="Parameters"
  Worksheets("Parameters" ).SelectCells.find(What:=piegenom).Select
  Worksheets("Parameters" ).Visible= False
 
Voila, je suis perdu je ne sais pas comment me déplacer d'un cran a droite et commen enregistrer ensuite cette valeur dans une var.
 
Merci pour votre attention.

pour le cranà droite regarde xlRight dans le mode F1, et pour la valeur ca fera valeur = activecell.value par exemple...

Bonjour,
Dim vartoto As (suivant type String, Integer etc)
Application.Goto Reference:="piegenom"
ActiveCell.Offset(0,1).Select (pour aller à ldroite de la cellule piegenom)
vartoto = ActiceCell.Value
A+

Bonjour à toi,
 
'changer de page active, rien de plus simple
 
worksheets("parameters" ).Activate
'et apres
worksheets("<la page sur laquelle tu veut écrire>" ).Activate
 
 
'déclaration de la variable
 
dim loc as variant
 
 
'apres pour te déplacer à droite, soit tu as les coordonnées de la cellule et là tu utilise le fait que cellule de droite revient à colonne d'après
'par exemple
 
loc=cells(<ta ligne>,<ta colonne>+1).Value
 
'sinon si la cellule est contenu dans une variable, ici Cell1 ( je di bien la cellule et pas son contenu) tu peut faire
 
loc=cells(   cel1.Row  , cel1.Column +1).Value
 
 
Pour conclure
 
 
on dit que la cellule considérée se trouve dans la variable 'cel1 de la page 'parameters et que tu veu mettre sa valeur dans la feuille 'Feuil1 dans la cellule (1,1) pour l'exemple
 
sub copierLaCaseChoisie()
dim loc as variant
worksheets("parameters" ).Activate
loc = cells(cel1.Row,cel1.Column +1).Value
worksheets("feuil1" ).Activate
cells(1,1).Value = loc
End sub
 
Ce code n'est pas testé mais marche assurément.
Merci de le tester et n'hésite pas à demander des renseignements ou à poster si le code ne marche pas ou ne convient pas a ce que tu attendais.