Ouvrir ecrire et refermer un fichier Excel

bonjour je souhaiterai ouvrir un fichier excel pour introduitre une date dans une cellule puis le refermer aussi tot via un formulaire vba qui ce trouve dans un autre classeur excel

Bonjour,

étant donnée que je n'est pas de fichier, je vais vous donner quelque méthode qui permet de faire sa :

ouvrir un classeur

  
dim wk as workbook
Set wk = Workbooks.Open("chemin vers le classeur")

pour l'écriture : maintenant que le classeur est ouvert rien de nouveau wk.sheets("nom de feuille ").range("A1")

pour fermer le classeur après avoir écrit

wk.close

merci pour l'info mais juste un detail a reglé je souhaiterai que toutes les feuilles selectionnées es la meme information en b7 via vba

Set wk = Workbooks.Open(txtb1)

Sheets.Select

Range("b7") = nom1

wk.Save
wk.Close

Bonjour,

quels sont les feuille sélectionnées dans votre code ?

sinon le code pour séléctionner une feuille est :

  wk.sheets("nom de la feuille").select  

pas besoin de wk si vous ete déjà dans le bon classeur

j'ai selectionner toutes les feuilles de mon classeur avec sheets.select ca sa fonctionne mais la suite du code n'ecrit pas dans toute les feuilles mais juste sur la première alors que toutes les feuilles sont actives.

Range("b7") = nom1

à tester avec ce petit code :

Sub test()
For Each ws In Sheets
  ws.Range("A1") = "succès"
Next ws
End Sub

à adapter

petite modif j'avais mal lu ton code :

"wk.sheets" et non "sheets"