Macro ouverture

[a10]

bonjour

1/ j'ai une macro qui ouvre un classeur nommé 1 TB.
mais tous les mois ce classeur change de nom javier 1 TB, fev : 2TB

je peux inscrire dans une cellule a1 le chiffre de 1 à 12 afin d'ouvrir soit le fichier 1 TB ou 2 TB.

comment modifier la macro

2/ j'ai une macro qui me change les formules
il change le chiffre 9 par le 10
tous les jours cela change
puis on peut avoir changement de 10 en 11
si dans une cellule j'inscrit a2= 9 et dans la cellule a3:10
comment peut on ecrire la macro?

3/
j'ai un classeur qui a 31 onglet

je voudrai qu'à la fin de la macro si dans la cellule b1 j'inscrit 20 la macro choisit l'onglet 20


comment ecrire cette macro?

a+

 

[vgendron]

Re : Macro ouverture

Bonsoir.
un classeur de 31 onglets. et meme pas un petit pour exemple?? ;-)

 

[JCGL]

Re : Macro ouverture

Bonjour à tous,

Pour ouvrir le fichier (il faut changer le chemin du fichier) :

Workbooks.Open Filename:="C:\Users\JCGL\Downloads\" & Month(Date) & " TB.xls"

Pour le reste, il faut que tu sois plus claire.
Tes demandes sont toujours un peu vagues... Et souvent sans fichier...

A + à tous

 

[a10]

Re : Macro ouverture

bonjour

voici le fichier

 

[vgendron]

Re : Macro ouverture

pour ouvrir le fichier qui va bien, JCGL t'a donné la réponse:
chemin="C:\....."

Workbooks.Open Filename:=chemin & Cells(1,1) & " TB.xls"

pour ouvrir l'onglet:
sheets(cells(11,1)).activate

pour le reste.. j'ai assez joué aux devinettes pour ce soir..;-)

 

[JCGL]

Re : Macro ouverture

Bonjour à tous,

Peux-tu essayer en A25 :

=INDIRECT("'"&MAX(B22:B23)&"'!A1")

et dans le ThisWorkbook :

Option Explicit


Private Sub Workbook_Open()
Workbooks.Open Filename:=ActiveWorkbook.Path & "\" & Cells(1, 1) & " TB.xlsx"
Sheets(Cells(11, 1).Text).Activate
End Sub

A + à tous

Edition : les deux fichiers dans le même répertoire. Ouvrir 13 1 14.xlsm

 

[a10]

Re : Macro ouverture

bonjour

j'essaye de comprendre pour realiser lepoint 1 et 3

mais comment traiter le point 2:

2/ j'ai une macro qui me change les formules
il change le chiffre 9 par le 10
tous les jours cela change
puis on peut avoir changement de 10 en 11
si dans une cellule j'inscrit a2= 9 et dans la cellule a3:10
comment peut on ecrire la macro?

a+

 

[a10]

Re : Macro ouverture

Bonjour,

Workbooks.Open Filename:="C:\Users\JCGL\Downloads\" & Month(Date) & " TB.xlsx

j'ai reussi a adapter cette macro

mais parfois si je suis le 1 du mois je voudrai ouvrir le fichier du mois precedent.

au lieu de mettre : & Month(Date) &

peux t on mettre la valeur de la cellule a1 qui serai soit 1 ou 2 etc

a+

 

[a10]

Re : Macro ouverture

bonsoir

je viens de trouver:
Cells(1, 1)


merci de votre aide