Copier une cellule dans la dernière ligne d'un tableau sur un autre fichier

Bonjour à tous,

Je souhaite copier la ligne "H1" de mon fichier "A", dans la dernière ligne de la colonne "AB" du tableau de mon fichier "B".

Pour celà j'ai fait ce code, mais ça ne marche pas ...

PS : les autres colonnes de la dernière ligne du tableau sont déja prêt-remplie par des inputs réalisés précédement. il ne faut donc pas recrée une nouvelle ligne mais bien renseigner la dernière ligne.

Sub save()

Dim Chemin As String
Dim NomFichier As String
Dim DERLINGE As Long

' VARIABLE, chemin du fichier (rajouter le "\" à la fin)
Chemin = "*****"

' VARIABLE, Nom du fichier
NomFichier = "B.xlsm"

'ON TROUVE LA DERNIERE LIGNE 
DERLIGNE = Range("A999999").End(xlUp).Row

'Ouverture du fichier DATA
Workbooks.Open Filename:=Chemin & NomFichier

'ça plante ici, sur cette ligne...
Workbooks("B.xlsm").Worksheets("Base de données").Range("AB" & DERLIGNE).Value = Workbooks("A.xlsm").Worksheets("ORDONNANCEMENT").Range("H1").Value  

'Sauvegarde du fichier B
Workbooks("B.xlsm").save

ThisWorkbook.Close

End Sub

Merci d'avance pour votre aide

Bonjour,

Qu'entends-tu par "ça plante ici...."?

Msg d'erreur?

Pas de recopie?

PS, mef à l'orthographe, par exemple, dim DERLINGE à la place de DERLIGNE...

Et aussi peut-être dans les noms d'onglets....

Pourquoi du détermines DERLIGNE dans ton fichier actuel et non dans le fichier B?

Bon bah merci ... en faite je suis juste bête ! c'etait bien l'orthographe ! ^^'