Compilation de Tableau
Bonjour,
J'ai un fichier avec 4 Onglet :
- Onglet "Résumé"
- Onglet "employé 1 - Resultat"
- Onglet "employé 2 - Resultat"
- ...
J'aimerai que le tableau sur le premier onglet soit une compilation des tableaux des onglets suivants.
Ainsi chaque employé pourrait remplir son tableau et en cliquant sur un bouton sur l'onglet 1, une macro combinerai ces 3 Tableaux en 1 seul
Voila ce que j'ai pour l'instant (vraiment pas grand chose)
Sub Update()
If MsgBox("Are you sure you want to update this table", vbYesNo, "Confirmation request") = vbYes Then
Range("B3").Select
Sheets("employé 1").Select
Range("B3").Select
Do While Not (IsEmpty(ActiveCell))
Dim index As Integer = 0
MsgBox "The table have been update !"
End If
End Sub
Merci beaucoup de votre aide
J'ai un fichier avec 4 Onglet :
- Onglet "Résumé"
- Onglet "employé 1 - Resultat"
- Onglet "employé 2 - Resultat"
- ...
J'aimerai que le tableau sur le premier onglet soit une compilation des tableaux des onglets suivants.
Ainsi chaque employé pourrait remplir son tableau et en cliquant sur un bouton sur l'onglet 1, une macro combinerai ces 3 Tableaux en 1 seul
Voila ce que j'ai pour l'instant (vraiment pas grand chose)
Sub Update()
If MsgBox("Are you sure you want to update this table", vbYesNo, "Confirmation request") = vbYes Then
Range("B3").Select
Sheets("employé 1").Select
Range("B3").Select
Do While Not (IsEmpty(ActiveCell))
Dim index As Integer = 0
MsgBox "The table have been update !"
End If
End Sub
Merci beaucoup de votre aide
