VBA Macro copie/colle dans un tableau la valeurde la celule A1 de chaque onglet

[amauryde]

Bonjour à tous, merci à ceux qui me donneront des pistes

Voila, j'ai fait un programme assez volumineux que je ne préfère pas joindre en pièce jointe.. Je vais du coup bien m'expliquer

onglet principal= onglet 1

Sur l'onglet 1 j'ai un bouton qui me permet d'ouvrir un onglet avec une feuille type à remplir,
une fois le remplissage du deuxième onglet fini je reclique sur ce bouton et j'ai un troisième onglet qui s'ouvre...
et ainsi de suite...

Ce que j'aimerai faire:

Créer un tableau dans l'onglet 1 me donnant:
- la valeur de la case B3 de l'onglet 2 dans la première ligne
- la valeur de la case B3 de l'onglet 3 dans la deuxième ligne
- et ainsi de suite

Ce qui me pose aussi problème c'est que je ne vois pas comment le tableau peut s'actualiser dès qu'un nouvel onglet est créé...

En vous remerciant,

Amaury

 

[Guest]

Re : VBA Macro copie/colle dans un tableau la valeurde la celule A1 de chaque onglet

Bonsoir,

Dans le module ThisWorkBook:

Private Sub Workbook_NewSheet(ByVal Sh As Object)
 With Sheets("Feuil1")
    .Range("A1:A" & .Cells(Rows.Count, 1).End(xlUp).Row)(2).Formula = "='" & Sh.Name & "'!$B$3"
 End With
End Sub

A+

 

[amauryde]

Re : VBA Macro copie/colle dans un tableau la valeurde la celule A1 de chaque onglet

Merci pour ta réponse si rapide
Je n'ai jamais utilisé un "thisworkbook" dc je suppose que ça marche comme un module classique.
Bref, en actualisant avec mon document, je mets ceci:

Private Sub Workbook_NewSheet(ByVal Sh As Object)
With Sheets("Hola!")
.Range("F12:F" & .Cells(Rows.Count, 1).End(xlUp).Row)(2).Formula = "='" & Sh.Name & "'!$B$26"
End With
End Sub

Mais rien ne se passe dans la celule F12 de la feuille "Hola!"

si tu peux m'éclairer 🙂

Merci

 

[pierrejean]

Re : VBA Macro copie/colle dans un tableau la valeurde la celule A1 de chaque onglet

Bonjour Amaury

Teste ceci

Edit: Salut Hasco 🙂 🙂

 

[amauryde]

Re : VBA Macro copie/colle dans un tableau la valeurde la celule A1 de chaque onglet

merci Pierre Jean, j'y suis presque:

Etant donné que je ne veux pas que ce bouton créé une autre page, mais que ce soit un autre j'ai viré la deuxième ligne 🙂
Mais du coup seulement la première ligne marche :S

voici le module:

Sub ListaCamiones()

Sheets("Hola!").Range("A" & Rows.Count).End(xlUp).Offset(1, 0) = ActiveSheet.Name
Sheets("Hola!").Range("A" & Rows.Count).End(xlUp).Offset(0, 1) = "=" & ActiveSheet.Name & "!B26"
End Sub

Qu'en penses-tu?

 

[Guest]

Re : VBA Macro copie/colle dans un tableau la valeurde la celule A1 de chaque onglet

Bonjour,

Je ne sais pas à qui tu parles mais en tout cas, j'en pense rien.... On ne connait ni ton classeur, ni comment tu travailles, ni de quel bouton tu parles, ni où tu en es. Cela va être facile de t'aider.

A+

 

[pierrejean]

Re : VBA Macro copie/colle dans un tableau la valeurde la celule A1 de chaque onglet

Re

Je n'en pense rigoureusement rien attendu que c'est toi qui en vois le resultat !!
Je plussoies naturellement aux dires de mon ami Hasco lesquels sont frappés au coin du bon sens

 

[Guest]

Re : VBA Macro copie/colle dans un tableau la valeurde la celule A1 de chaque onglet

Re,

@Pierre-Jean, ça a l'avantage de nous permettre de nous croiser. Ce qui est toujours un grand plaisir.
Embrasse qui tu sais.

A+++

 

[amauryde]

Re : VBA Macro copie/colle dans un tableau la valeurde la celule A1 de chaque onglet

Bonjour, Je n'ai pu vous répondre hier n'ayant plus de réseau dans l'usine et n'ayant pas internet chez moi (Espagne)

Je vous fais un fichier exemple pour que vous puissiez visualiser. Merci à vous

 

[amauryde]

Re : VBA Macro copie/colle dans un tableau la valeurde la celule A1 de chaque onglet

Bonjour à tous,
voici mon fichier:

J'ai donc deux boutons distincts:

1) créer une nouvelle page (qui marche bien)
2) et un bouton actualiser pour me permettre d'avoir toutes les cellules B26 dans un tableau dont la premiière colonne est le nom de l'onglet.
Mon probleme est que la 3ème ligne du module ne marche pas, et que l'onglet Hola! apparait dans le tableau et que la cellule B26 de hola ne me sert à rien.

Merci

 

[pierrejean]

Re : VBA Macro copie/colle dans un tableau la valeurde la celule A1 de chaque onglet

Re

Vois si cela te convient

 

[amauryde]

Re : VBA Macro copie/colle dans un tableau la valeurde la celule A1 de chaque onglet

je suis :O, c'est génial j'essaye de l'insérer à mon programme 🙂

merci

 

[amauryde]

Re : VBA Macro copie/colle dans un tableau la valeurde la celule A1 de chaque onglet

j'ai une autre question pierrejean:
le fichier datos est un onglet modèle, à chaque fois que je crée un nouvel onglet il est basé sur celui-ci, J'aimerai masquer ce fichier (datos) tout en continuant à pouvoir créer des onglets à partir du premier bouton de la page hola.

Le problème est qu'une fois masqué, mon programme ne marche plus:
-il me crée un autre onglet masqué sous le nom datos(2)
- et il me change le nom de la feuille hola par la valeur de la textboox1

As tu une idée d'ou ça peut provenir? Tu peux voir ce problème ds mon fichier précédent