Bonjour le forum,
Dans un classeur excel j'ai entré en variable un nom de classeur et un nom d'onglet afin d'ouvrir ce dernier et pointer sur l'onglet désigné :
Option Explicit
Dim ouvrir As Variant
Dim onglet As Variant
Function doc()
Sheets("conf").Select
Range("O60").Activate
ouvrir = ActiveCell.Value
End Function
Function Dest()
Sheets("conf").Select
Range("O61").Activate
onglet = ActiveCell.Value
End Function
Cependant, quand je lance ma procédure, j'obtiens un message d'erreur me disant que l'indice n'appartient pas à la selection. Voilà ma procédure :
Sub Renommer()
variables.doc
variables.Dest
Windows("ouvrir").Activate
Sheets("onglet").Select
end sub
J'ai déjà tenté plusieurs syntaxe mais je ne parviens pas à résoudre ce problème. J'espere donc pouvoir bénéficier de vos lumières en cette belle rentrée.
Merci beaucoup
Dans un classeur excel j'ai entré en variable un nom de classeur et un nom d'onglet afin d'ouvrir ce dernier et pointer sur l'onglet désigné :
Option Explicit
Dim ouvrir As Variant
Dim onglet As Variant
Function doc()
Sheets("conf").Select
Range("O60").Activate
ouvrir = ActiveCell.Value
End Function
Function Dest()
Sheets("conf").Select
Range("O61").Activate
onglet = ActiveCell.Value
End Function
Cependant, quand je lance ma procédure, j'obtiens un message d'erreur me disant que l'indice n'appartient pas à la selection. Voilà ma procédure :
Sub Renommer()
variables.doc
variables.Dest
Windows("ouvrir").Activate
Sheets("onglet").Select
end sub
J'ai déjà tenté plusieurs syntaxe mais je ne parviens pas à résoudre ce problème. J'espere donc pouvoir bénéficier de vos lumières en cette belle rentrée.
Merci beaucoup