Office: (Office 2013) Kleine Knobelei mit Kommentaren

Hallo Ihr lieben Excel Götter,

eine kleine Knobelei mit Kommentaren hätte ich mal.

http://www.herber.de/bbs/user/102202.xlsm

Im Anhang habe ich eine Tabelle, wie ich sie mir vorstelle angehangen.
Es soll ein Patchplan werden wo die Patche automatisch in der Geräteübersicht als Kommentare eingefügt werden.

eine private Funktion zum erstellen habe ich auch schon gefunden und eingebunden:

Public Function TakeComment(rngQuelle As Range, Optional rngZiel As Range)
If rngZiel Is Nothing Then
Set rngZiel = Application.Caller
End If
With rngZiel
If Not .Comment Is Nothing Then
.Comment.Delete
End If
.AddComment rngQuelle(1, 1).Text
End With
End Function

Hab ich also in der Zelle xx z.B. auf der Hilfsseite die Funktion

=TakeComment(D3;C1)

so wird der Inhalt von D3 in C1 als Kommentar eingefügt soweit so gut.

Nun komme ich aber nicht weiter, da das ganz ja dynamisch funtionieren soll, d.h.auf der Seite Patchplan gebe ich in C4:Cxxxx den Port an und in E4:Exxxx die HE aus der Kombination soll sich dann der VON Wert für TakeComment ergeben nach dem selben Prinzip hatte ich mir das für das Ziel auch vorgestellt und das sich der Kommentar in Ziel und Quelle einträgt.

z.B. der Eintrag im Patchplan

von HE nach HE
Gerät Port Standort Gerät Port Standort Beschreibung
SW01 a Schrank1 3 PF01 a Schrank1 21

soll folgendes erzeugen:

in der Zelle Schrank1!A21 einen Kommentar der Schrank1!A3 heist

und

in der Zelle Schrank1!A3 einen Kommentar der Schrank1!A21 heist

mit =TakeComment(rngQuelle;rngZiel) erfülle ich das ganze zum Teil aber das rngZiel bekomme ich nicht zusammen gebastel

rngQuelle wäre z.B AA4 AA4 =D4&"1"&C4&E4 ==> Schrank1!A3

Für Hilfe und Denkanstöße wäre ich euch sehr Dankbar.

lG Bernd

 

Hallo,

es wäre gut gewesen, zumindestens hier Bescheid zu geben, dass Du Deine Frage auch bei Office-Lösung hier http://www.office-loesung.de/p/viewtopic.php?f=166&t=709253 gepostet hast und auch dort Antworten erhalten hast (15:30). Im Normalfall hätten sich sonst in diesem Forum Leute mit dem Problem beschäftigt, ohne was von den anderen aus Office-Lösung zu wissen. Doppelte Arbeit :-(

Gruß

 

Hola,

@maninweb: mein Hinweis dazu hat ihn auch nicht interessiert. Und bevor du weiter suchst.....

http://www.herber.de/forum/messages/1464006.html

Gruß,
steve1da

 

Ich habe alle Hinweise verstanden und auch zu Herzen genommen. Da mir das, in dieser Form so nicht bewust war, bitte ich alle um Entschuldigung und werde anschließend, in den entsprechenden Foren, die Lösung einsetzen.

MfG
Bernd

 

Wurde hier: http://www.office-loesung.de/p/viewtopic.php?f=166&t=709253&p=2933429#p2933429

abschließend geklärt

Danke an alle.