Bonjour
j'ai une application sur excel 2007 ou je calcule des données pour chaque personne stocker dans la base des données après je veux stocker ses donnés dans un tableau excel on cliquant sur un bouton Envoyer vers la table Pouvez m'aider pour construire cette Macro SVP
Et Merci Bien
Re : Envoyer des résultats calculer dans un tableau Excel
Bonsoir ccinfo,
Fichier joint avec cette macro dans Module1 (Alt+F11) :
Code:
Sub Transfert()
Sheets("Calcule").Activate
With Sheets("Tableau").[C65536].End(xlUp)(2)
.Offset(0) = [D4]
.Offset(, 1) = [E9]
.Offset(, 2) = [E10]
.Parent.Activate 'facultatif
End With
End Sub
Edit : attention, il y avait un espace après "Tableau" dans le nom de l'onglet !!!
Re : Envoyer des résultats calculer dans un tableau Excel
Bonjour ccinfo, le forum,
En Tableau!H9 et Tableau!H10 par exemple :
Code:
Sub Transfert()
Sheets("Calcule").Activate
With Sheets("Tableau")
With .[C65536].End(xlUp)(2)
.Offset(0) = [D4]
.Offset(, 1) = [E9]
.Offset(, 2) = [E10]
End With
.[H9] = .[H9] + [E9]
.[H10] = .[H10] + [E10]
.Activate 'facultatif
End With
End Sub