Es ist häufig handlich, Arbeitsblatt-Text in eine Karte einzuschließen. Zum Beispiel, wenn das zu Grunde liegende Arbeitsblatt einen Titel hat, könnten Sie auch diesen Text als Ihr Karte-Titel verwenden wollen. Ähnlich könnten Sie einen Arbeitsblatt-Wert haben es ist mit der Karte wie ein Durchschnitt der Werte in einer Reihe verbunden, und Sie könnten diesen Wert als ein Teil des Karte-Titels oder des Wertachse-Titels einschließen wollen. Sie können einfach den passenden Karte-Gegenstand-Text mit der Hand editieren, um den Wert einzuschließen. Jedoch, wenn dieser Wert unterworfen ist, um sich zu ändern (besonders, wenn es a ist

berechneter Wert wie ein Durchschnitt), dann müssen Sie immer den Karte-Gegenstand mit der Hand aktualisieren. Ideal ist es groß, eine Methode zu verwenden, wodurch der Karte-Text automatisch aktualisiert wird, wann auch immer sich der Arbeitsblatt-Text ändert.

In vorherigen Versionen dessen ragen Hervor, Sie können tun das ganz leicht, einen Karte-Text verbindend, protestiert gegen eine Arbeitsblatt-Zelle. Sie tun das, den Karte-Textgegenstand auswählend, ein Gleichheitszeichen (=) tippend, um zu lassen, ragt Hervor wissen, dass Sie in eine Formel eingehen wollen, auf die Arbeitsblatt-Zelle klickend, die den Text enthält, den Sie wollten, und dann das Drücken Hereingeht, um die Formel zu bestätigen. Leider war diese leichte und aufrichtige Methode darin fallen gelassen Übertreffen 2007, der jetzt Karte-Textgegenstände als reine Textkästen behandelt, die Formeln nicht einschließen können.

Glücklich gibt es eine Weise, um diese Beschränkung zu arbeiten, ein wenig VBA-Code verwendend, der die Tatsache ausnutzt, dass Karte-Textgegenstände ein Texteigentum haben. Die Idee besteht darin, dass Sie VBA verwenden, um ein dem Wert einer Arbeitsblatt-Zelle gleiches Texteigentum eines Gegenstands zu setzen. Zum Beispiel entspricht der Karte-Titel dem ChartTitle-Gegenstand, so modifizieren Sie den ChartTitle. Texteigentum.

Nehmen Sie zum Beispiel an, dass der Arbeitsblatt-Titel in der Zelle A1 ist. Wenn Sie denselben Text im Karte-Titel verwenden wollen, klicken Sie auf die Karte, um es zu aktivieren und dann in den folgenden Code im Fenster Visual Basic Editor's Immediate einzugehen:

BEMERKEN

Mit dem Grundlegenden Sehredakteur offen (drücken Alt+F11), zeigen Sie das Fenster Immediate, indem Sie Ansicht, Unmittelbares Fenster wählen, oder indem Sie Ctrl+G drücken.

ActiveChart. ChartTitle. Text = ActiveSheet. Reihe ("A1 )

Das gibt Ihnen einen statischen Karte-Titel. D. h. wenn Sie den Titel in der Zelle A1 ändern, aktualisiert der Karte-Titel nicht automatisch. Es ist nicht ein Problem für einen Titel der ändert sich nicht, aber und wenn Sie einen flüchtigen Wert wie ein Durchschnitt als ein Teil des Karte-Titels verwenden? Zum Beispiel in Anbetracht eines Arbeitsblattes, das den Durchschnitt einer Datenreihe in der Zelle C3 zeigt, ist hier ein Verfahren, das den Durchschnitt in den Karte-Titeltext einschließt:

Öffentliches U-Boot WriteChartTitle ()
Mit ActiveSheet. ChartObjects (1).Chart
.ChartTitle. Text = "Nahe (Durchschnitt =" & Format (ActiveSheet. Reihe ("C3 ), "00.0 ) &")"
Ende Damit
EndU-Boot

Abbildung 1 zeigt die Karte mit dem hinzugefügten Text. (Bemerken Sie, dass in diesem Verfahren ich eine wohl mehr durchdachte Verweisung auf die Karte-ActiveSheet verwendete. ChartObjects (1).Chart. Das bedeutet, dass die Karte nicht aktiviert werden muss, um den Titel zu setzen.)

Abbildung 1 der Titel dieser Karte schließt den durchschnittlichen Wert calcuÂ-lated in die Zelle C3 ein.

Es ist fein, aber der Titeltext ist noch statisch. Wie wir kann kommen Hervorzuragen, um den Karte-Titel automatisch zu aktualisieren, wenn sich der Durchschnitt ändert? Es würde nett sein, wenn Hervorragen, bot 2007 eine direkte Weise an, das zu tun, aber es tut nicht, so müssen wir einen mehr umständlichen Weg nehmen. Spezifisch müssen wir die Tatsache ausnutzen, die darin Hervorragen, können Sie das SheetChange Ereignis fangen, das schießt, wann auch immer sich Zelldaten in jedes Arbeitsblatt ändern. Folgen Sie diesen Schritten, einen Dressierer für dieses Ereignis zu schaffen:

1. Im Grundlegenden Sehredakteur, verwenden Sie das Fenster Project, um sich zu öffnen, die VBA planen, dass correÂ-sponds zur Betriebsanleitung, die Ihre Karte enthält.
2. Klicken Sie auf den ThisWorkbook Artikel im Projekt doppel. Der Grundlegende Sehredakteur öffnet ein Modul-Fenster für den ThisWorkbook-Gegenstand.
3. Im Modul-Fenster, ziehen Sie die Gegenstand-Liste des Falls unten herunter (an der Oberseite vom Modul, es ist die Liste links), und wählen Sie Betriebsanleitung aus.
4. Ziehen Sie die Verfahren-Liste des Falls unten herunter (an der Oberseite vom Modul, es ist die Liste rechts), und wählen Sie SheetChange aus. Der Grundlegende Sehredakteur fügt den folgenden Verfahren-Stummel hinzu:
   Privates U-Boot Workbook_SheetChange (ByVal Sch Als Gegenstand, ByVal Ziel Als Reihe)
   EndU-Boot
5. Tippen Sie Ihren Ereignis-Dressierer-Code zwischen den U-Boot- und EndU-Boot-Behauptungen.

Im Verfahren-Stummel Sch vertritt Variable das Arbeitsblatt, auf dem sich der Wert änderte, und die Zielvariable den Reihe-Gegenstand vertritt (d. h. die Zelle), der geändert wurde. Im Beispiel sollten Sie überprüfen, um zu sehen, ob der Name der Platte dasselbe als Name der Platte ist, auf der die Karte (Arbeitsblatt-Text, in diesem Fall) wohnt. Wenn es ist, nennen Sie das Verfahren, das den Karte-Titel schreibt. Hier ist der Code:

Privates U-Boot Workbook_SheetChange (ByVal Sch Als Gegenstand, ByVal Ziel Als Reihe)
Wenn Sch. Name = "Arbeitsblatt-Text" Dann
WriteChartTitle
Ende Wenn
EndU-Boot

Technorati Anhängsel: Arbeitsblatt-Text in der Karte

Beliebtheit: 4 % [?]

Es ist häufig handlich, Arbeitsblatt-Text in eine Karte einzuschließen. Zum Beispiel, wenn das zu Grunde liegende Arbeitsblatt einen Titel hat, könnten Sie auch diesen Text als Ihr Karte-Titel verwenden wollen. Ähnlich könnten Sie einen Arbeitsblatt-Wert haben es ist mit der Karte wie ein Durchschnitt der Werte in einer Reihe verbunden, und Sie könnten diesen Wert als ein Teil des Karte-Titels oder des Wertachse-Titels einschließen wollen. Sie können einfach den passenden Karte-Gegenstand-Text mit der Hand editieren, um den Wert einzuschließen. Jedoch, wenn dieser Wert unterworfen ist, um sich zu ändern (besonders, wenn es a ist

berechneter Wert wie ein Durchschnitt), dann müssen Sie immer den Karte-Gegenstand mit der Hand aktualisieren. Ideal ist es groß, eine Methode zu verwenden, wodurch der Karte-Text automatisch aktualisiert wird, wann auch immer sich der Arbeitsblatt-Text ändert.

In vorherigen Versionen dessen ragen Hervor, Sie können tun das ganz leicht, einen Karte-Text verbindend, protestiert gegen eine Arbeitsblatt-Zelle. Sie tun das, den Karte-Textgegenstand auswählend, ein Gleichheitszeichen (=) tippend, um zu lassen, ragt Hervor wissen, dass Sie in eine Formel eingehen wollen, auf die Arbeitsblatt-Zelle klickend, die den Text enthält, den Sie wollten, und dann das Drücken Hereingeht, um die Formel zu bestätigen. Leider war diese leichte und aufrichtige Methode darin fallen gelassen Übertreffen 2007, der jetzt Karte-Textgegenstände als reine Textkästen behandelt, die Formeln nicht einschließen können.

Glücklich gibt es eine Weise, um diese Beschränkung zu arbeiten, ein wenig VBA-Code verwendend, der die Tatsache ausnutzt, dass Karte-Textgegenstände ein Texteigentum haben. Die Idee besteht darin, dass Sie VBA verwenden, um ein dem Wert einer Arbeitsblatt-Zelle gleiches Texteigentum eines Gegenstands zu setzen. Zum Beispiel entspricht der Karte-Titel dem ChartTitle-Gegenstand, so modifizieren Sie den ChartTitle. Texteigentum.

Nehmen Sie zum Beispiel an, dass der Arbeitsblatt-Titel in der Zelle A1 ist. Wenn Sie denselben Text im Karte-Titel verwenden wollen, klicken Sie auf die Karte, um es zu aktivieren und dann in den folgenden Code im Fenster Visual Basic Editor's Immediate einzugehen:

BEMERKEN

Mit dem Grundlegenden Sehredakteur offen (drücken Alt+F11), zeigen Sie das Fenster Immediate, indem Sie Ansicht, Unmittelbares Fenster wählen, oder indem Sie Ctrl+G drücken.

ActiveChart. ChartTitle. Text = ActiveSheet. Reihe ("A1 )

Das gibt Ihnen einen statischen Karte-Titel. D. h. wenn Sie den Titel in der Zelle A1 ändern, aktualisiert der Karte-Titel nicht automatisch. Es ist nicht ein Problem für einen Titel der ändert sich nicht, aber und wenn Sie einen flüchtigen Wert wie ein Durchschnitt als ein Teil des Karte-Titels verwenden? Zum Beispiel in Anbetracht eines Arbeitsblattes, das den Durchschnitt einer Datenreihe in der Zelle C3 zeigt, ist hier ein Verfahren, das den Durchschnitt in den Karte-Titeltext einschließt:

Öffentliches U-Boot WriteChartTitle ()
Mit ActiveSheet. ChartObjects (1).Chart
.ChartTitle. Text = "Nahe (Durchschnitt =" & Format (ActiveSheet. Reihe ("C3 ), "00.0 ) &")"
Ende Damit
EndU-Boot

Abbildung 1 zeigt die Karte mit dem hinzugefügten Text. (Bemerken Sie, dass in diesem Verfahren ich eine wohl mehr durchdachte Verweisung auf die Karte-ActiveSheet verwendete. ChartObjects (1).Chart. Das bedeutet, dass die Karte nicht aktiviert werden muss, um den Titel zu setzen.)

Abbildung 1 der Titel dieser Karte schließt den durchschnittlichen Wert calcuÂ-lated in die Zelle C3 ein.

Es ist fein, aber der Titeltext ist noch statisch. Wie wir kann kommen Hervorzuragen, um den Karte-Titel automatisch zu aktualisieren, wenn sich der Durchschnitt ändert? Es würde nett sein, wenn Hervorragen, bot 2007 eine direkte Weise an, das zu tun, aber es tut nicht, so müssen wir einen mehr umständlichen Weg nehmen. Spezifisch müssen wir die Tatsache ausnutzen, die darin Hervorragen, können Sie das SheetChange Ereignis fangen, das schießt, wann auch immer sich Zelldaten in jedes Arbeitsblatt ändern. Folgen Sie diesen Schritten, einen Dressierer für dieses Ereignis zu schaffen:

1. Im Grundlegenden Sehredakteur, verwenden Sie das Fenster Project, um sich zu öffnen, die VBA planen, dass correÂ-sponds zur Betriebsanleitung, die Ihre Karte enthält.
2. Klicken Sie auf den ThisWorkbook Artikel im Projekt doppel. Der Grundlegende Sehredakteur öffnet ein Modul-Fenster für den ThisWorkbook-Gegenstand.
3. Im Modul-Fenster, ziehen Sie die Gegenstand-Liste des Falls unten herunter (an der Oberseite vom Modul, es ist die Liste links), und wählen Sie Betriebsanleitung aus.
4. Ziehen Sie die Verfahren-Liste des Falls unten herunter (an der Oberseite vom Modul, es ist die Liste rechts), und wählen Sie SheetChange aus. Der Grundlegende Sehredakteur fügt den folgenden Verfahren-Stummel hinzu:
   Privates U-Boot Workbook_SheetChange (ByVal Sch Als Gegenstand, ByVal Ziel Als Reihe)
   EndU-Boot
5. Tippen Sie Ihren Ereignis-Dressierer-Code zwischen den U-Boot- und EndU-Boot-Behauptungen.

Im Verfahren-Stummel Sch vertritt Variable das Arbeitsblatt, auf dem sich der Wert änderte, und die Zielvariable den Reihe-Gegenstand vertritt (d. h. die Zelle), der geändert wurde. Im Beispiel sollten Sie überprüfen, um zu sehen, ob der Name der Platte dasselbe als Name der Platte ist, auf der die Karte (Arbeitsblatt-Text, in diesem Fall) wohnt. Wenn es ist, nennen Sie das Verfahren, das den Karte-Titel schreibt. Hier ist der Code:

Privates U-Boot Workbook_SheetChange (ByVal Sch Als Gegenstand, ByVal Ziel Als Reihe)
Wenn Sch. Name = "Arbeitsblatt-Text" Dann
WriteChartTitle
Ende Wenn
EndU-Boot

Technorati Anhängsel: Arbeitsblatt-Text in der Karte

Beliebtheit: 4 % [?]