VBA Erreur d'Exécution : Effacer le Contenu d'une feuille Excel

J'ai écrit à la suite du code VBA dans Excel 2003 pour effacer le contenu d'une feuille excel;
Mais il montre

Erreur d'exécution 438: cet Objet ne gère pas cette propriété ou cette Méthode

Voici mon code,

Application.DisplayAlerts = False
Application.ScreenUpdating = False

Set wbk = Workbooks.Open("C:\a.xls")
wbk.Sheet1.Cells.ClearContents 'Error at this line
wbk.Save
wbk.Close

Application.DisplayAlerts = True
Application.ScreenUpdating = True

Pouvait-on s'il vous plaît laissez-moi savoir si wbk.La feuille Sheet1.Les cellules.ClearContents n'est pas pris en charge lorsque excel est invisible. Comment puis-je effacer le contenu d'une feuille excel quand il est invisible?

Essayez wbk.Sheets("Sheet1").Cells.ClearContents
Super! Son travail; Vous pouvez l'ajouter comme une réponse... Merci
C'est Ok 🙂 Vous pouvez aussi répondre à vos questions 🙂
dans son cas, il est l'ouverture du classeur, de manière invisible, est-ce que le droit? 🙂 Coz s'il est complètement fermée, alors, il n'y aura pas un workbooks.open ligne. Corrigez-moi si je me trompe.
Yup le classeur est ouvert en mode invisible, mais qui n'est pas le problème ici. 🙂

OriginalL'auteur logan | 2012-12-26

  1. 4

    J'ai utilisé le suivant et il est résolu maintenant!

    wbk.Sheets("Sheet1").Cells.ClearContents
    Btw, vous devriez être en mesure d'approuver votre propre réponse.
    oui, mais il nécessite de 16hrs à l'approbation de ma propre réponse

    OriginalL'auteur logan