Home Office-Hilfe.com - Wir lösen Ihr Problem mit Microsoft Excel, Word, Outlook, PowerPoint, Access gratis Forum Impressum

  Kommentare
Neues Thema eröffnenNeue Antwort erstellen
Autor Nachricht
gook
Schlauberger
Schlauberger


Anmeldedatum: 25.11.2007
Beiträge: 490
Wohnort: Fridingen an der Donau

BeitragVerfasst am: 30.11.2007, 19:01 Nach oben

Hallo

So angenommen A1 = 1 wenn A1 =1 dann soll in A1 ein Kommentar erscheinen mit dem Text aus z.B B20 wenn A1=2 dann aus B21 usw.
Benutzer-Profile anzeigenPrivate Nachricht sendenE-Mail senden
schatzi
Moderator
Moderator


Anmeldedatum: 09.12.2006
Beiträge: 5749

BeitragVerfasst am: 30.11.2007, 19:12 Nach oben

Hallo!

Das ist nur mit VBA möglich:
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
Target.ClearComments
Dim Kom As Comment
Set Kom = Target.AddComment
Kom.Text Range("B" & Target + 19).Text
End If
End Sub

Einfacher wäre es, wenn du die Zelle daneben als Kommentarzelle nutzt. Dann reicht die Formel
=INDEX(B20:B30;A1)
oder
=INDIREKT("B"&A1+19)

_________________

Viele Grüße vom Schatzi

------------------------
Ich bin nur noch sporadisch erreichbar!
Bitte hofft nicht auf eine schnelle Beantwortung einer Rückfrage meinerseits!
Jeder andere Helfer darf Rückfragen gerne übernehmen und hilft sicher gerne weiter!
Benutzer-Profile anzeigenPrivate Nachricht senden
gook
Schlauberger
Schlauberger


Anmeldedatum: 25.11.2007
Beiträge: 490
Wohnort: Fridingen an der Donau

BeitragVerfasst am: 30.11.2007, 19:25 Nach oben

ok gut so klappt es echt gut aber ein problem gibt es wen ich jetzt in B20 einen anderen wert reinschreibe bleibt in dem Kommentar immer noch der alte wert stehen.
Benutzer-Profile anzeigenPrivate Nachricht sendenE-Mail senden
schatzi
Moderator
Moderator


Anmeldedatum: 09.12.2006
Beiträge: 5749

BeitragVerfasst am: 30.11.2007, 19:33 Nach oben

Und so?

Code:
Private Sub Worksheet_Change(ByVal Target As Range)
Range("A1").ClearComments
Dim Kom As Comment
Set Kom = Range("A1").AddComment
Kom.Text Range("B" & Range("A1").Value + 19).Text
End Sub

_________________

Viele Grüße vom Schatzi

------------------------
Ich bin nur noch sporadisch erreichbar!
Bitte hofft nicht auf eine schnelle Beantwortung einer Rückfrage meinerseits!
Jeder andere Helfer darf Rückfragen gerne übernehmen und hilft sicher gerne weiter!
Benutzer-Profile anzeigenPrivate Nachricht senden
gook
Schlauberger
Schlauberger


Anmeldedatum: 25.11.2007
Beiträge: 490
Wohnort: Fridingen an der Donau

BeitragVerfasst am: 30.11.2007, 19:39 Nach oben

Ja sehr gut so geht es ok jetzt noch meine letze frage da ich mich leider mit VBA nicht so gut auskenne. Wie ändere ich mir das makro wen ich z.B will das in A1:A20 alles ausgegeben wird was in C1:20 steht wen der wert stimmt?
Benutzer-Profile anzeigenPrivate Nachricht sendenE-Mail senden
schatzi
Moderator
Moderator


Anmeldedatum: 09.12.2006
Beiträge: 5749

BeitragVerfasst am: 30.11.2007, 19:44 Nach oben

Hallo!
Zitat:
wen ich z.B will das in A1:A20 alles ausgegeben wird was in C1:20 steht wen der wert stimmt?

Hä???
Verstehst du selbst, was du da geschrieben hast?
Ich leider nicht...

_________________

Viele Grüße vom Schatzi

------------------------
Ich bin nur noch sporadisch erreichbar!
Bitte hofft nicht auf eine schnelle Beantwortung einer Rückfrage meinerseits!
Jeder andere Helfer darf Rückfragen gerne übernehmen und hilft sicher gerne weiter!
Benutzer-Profile anzeigenPrivate Nachricht senden
gook
Schlauberger
Schlauberger


Anmeldedatum: 25.11.2007
Beiträge: 490
Wohnort: Fridingen an der Donau

BeitragVerfasst am: 30.11.2007, 19:53 Nach oben

Hm ok hast recht blöd erklärt^^


makro.xlsx
 Beschreibung:

Download
 Dateiname:  makro.xlsx
 Dateigröße:  8.54 KB
 Heruntergeladen:  33 mal

Benutzer-Profile anzeigenPrivate Nachricht sendenE-Mail senden
schatzi
Moderator
Moderator


Anmeldedatum: 09.12.2006
Beiträge: 5749

BeitragVerfasst am: 30.11.2007, 20:01 Nach oben

Das sind ja jetzt wieder völlig andere Bereiche...
Zitat:
wen eine 7 steht dann soll G2 ausgegeben werden wen ne 3 steht soll C2 ausgegeben werden

Ich glaube, das verstehe ich:
G = 7. Spalte
C = 3. Spalte
Zitat:
So also wen in A1 ne 1 steht soll B1 als Kommnentar ausgegeben werden

Das verstehe ich nicht, weil es nicht in das Schema von oben passt.
Zitat:
oder sagen wir mal in B1 steht "hallo" dann soll F2 ausgegeben werden einigermassen verständlich?

Das verstehe ich nun überhaupt nicht...

_________________

Viele Grüße vom Schatzi

------------------------
Ich bin nur noch sporadisch erreichbar!
Bitte hofft nicht auf eine schnelle Beantwortung einer Rückfrage meinerseits!
Jeder andere Helfer darf Rückfragen gerne übernehmen und hilft sicher gerne weiter!
Benutzer-Profile anzeigenPrivate Nachricht senden
gook
Schlauberger
Schlauberger


Anmeldedatum: 25.11.2007
Beiträge: 490
Wohnort: Fridingen an der Donau

BeitragVerfasst am: 30.11.2007, 20:05 Nach oben

hm egal lassen wir das ist eh nicht so wichtig noch ne andere frage

Also in A1 steht z.b eine Zahl und ein Kommentar

wen ich jetzt in B2 schreibe =A1 übernimt die zelle nur den wert und nicht das Kommentar ist das irgendwie möglich das Kommentar mit zu übernehmen das würde meinem Problem auch schon mehr sehr helfen.
Benutzer-Profile anzeigenPrivate Nachricht sendenE-Mail senden
schatzi
Moderator
Moderator


Anmeldedatum: 09.12.2006
Beiträge: 5749

BeitragVerfasst am: 30.11.2007, 20:09 Nach oben

Formeln übernehmen NUR die Werte.
Zellformate und Kommentare (und alles andere, was es sonst noch gibt) können per Formel nicht übernommen werden.

_________________

Viele Grüße vom Schatzi

------------------------
Ich bin nur noch sporadisch erreichbar!
Bitte hofft nicht auf eine schnelle Beantwortung einer Rückfrage meinerseits!
Jeder andere Helfer darf Rückfragen gerne übernehmen und hilft sicher gerne weiter!
Benutzer-Profile anzeigenPrivate Nachricht senden
gook
Schlauberger
Schlauberger


Anmeldedatum: 25.11.2007
Beiträge: 490
Wohnort: Fridingen an der Donau

BeitragVerfasst am: 30.11.2007, 20:10 Nach oben

OK alles klar vielen Dank!!
Benutzer-Profile anzeigenPrivate Nachricht sendenE-Mail senden
Beiträge der letzten Zeit anzeigen:      
Neues Thema eröffnenNeue Antwort erstellen


Ähnliche Beiträge
Thema Autor Forum Antworten Verfasst am
Keine neuen Beiträge Kommentare gook Microsoft Excel Hilfe 7 25.01.2008, 17:47 Letzten Beitrag anzeigen
Keine neuen Beiträge Passende Kommentare je nach Auswahl a... Ag.man Microsoft Excel Hilfe 15 06.09.2007, 19:46 Letzten Beitrag anzeigen
Keine neuen Beiträge Kommentare bei Blattschutz erlauben Budderbirne1986 Microsoft Excel Hilfe 1 22.09.2006, 08:08 Letzten Beitrag anzeigen
Keine neuen Beiträge Kommentare in Excel entfernen Campy Microsoft Excel Hilfe 1 30.06.2006, 06:42 Letzten Beitrag anzeigen


 Gehe zu:   



Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum posten
Du kannst Dateien in diesem Forum herunterladen

Haftungsausschluss/Disclaimer


SMS kostenlos versenden | Battle-Dream | Tuning Forum | Join the YoungGeneration | krankenversicherungsvergleich | Kalorienarme Rezepte!
Versicherungsvergleich | Bürobedarf | Papier | Betten

Ranking-Hits



Powered by phpBB © 2001, 2002 phpBB Group :: FI Theme :: Alle Zeiten sind GMT + 1 Stunde
Deutsche Übersetzung von phpBB.de