Discussion :

[timtof2011]

bonjour à tous,

voilà,

j'ai deux fichiers, un fichier A, l'autre fichier B et trois texbox

j'aimerai arriver à copier le contenu des textbox une fois saisie à partir du fichier A vers le fichier B dans la feuille "Base" ouvert ou non...

celà dans le but d'avoir une base de donnée séparé du fichier A qui est le programme...

Voici une partie de mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
 
Private Sub Valider_Click()
 
'--- Positionnement dans la base
   Ligne = Sheets("BDC").[B65000].End(xlUp).Row + 1
 
'--- Transfert Formulaire dans feuille "Base"
    Sheets("Base").Cells(Ligne, 2) = Application.Proper(Me!Nom)
    Sheets("Base").Cells(Ligne, 3) = Application.Proper(Me!Prenom)
    Sheets("Base").Cells(Ligne, 4) = Application.Proper(Me!Adresse)
End Sub

d'avance merci...en attendant je continue...

[Nako_lito]

quand tu fais ton envois de données, il faut que tu identifie de manière plus strict sur quel classeur tu travailles. Envoyer .sheets("Feuil1"). blablabla est confu pour Excel.

Identifie bien tes classeur avec thisworkbook (pour le classeur qui exécute le programme), sinon tu peux utiliser

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Workbooks("le nom de mon fichier.xls").sheets("Feuille1").Range("A1") = thisworkbook.sheets("Feuille1").range("A1")

evite d'utiliser la méthode ActiveWorkBook car il se base sur la feuille en cours d'activité, et si t'amuse a faire des vas et viens entre plusieur fichier, il va te copier/coller n'importe quoi n'importe ou.

[timtof2011]

merci bcp Nako_lito, je vais essayer ça ce soir...
bien à toi.
Tim.