Supportnet Computer
Planet of Tech

Supportnet / Forum / Tabellenkalkulation

VB-Code für Stichwörter aus MS-Project





Frage

Hi, Ich hätte da mal ein kurzes Problem/ eine kurze Frage. Weiß jemand -wie der Titel schon sagt- wie der VB-Code lautet um einer Variable das Stichwortfeld (Keywords) aus den Project Datei-Eigenschaften zuzuweisen? Es gibt ja auch das Kommentarfeld - dort weiß ich lautet es z.B.: = Projects(1).Projectnotes Dieses ist aber bei uns bereits für etwas anderes belegt. Ich hab schon in der Hilfe und etlichen Suchbegriffen@Google passendes gesucht aber wirklich brauchbares habe ich nicht gefunden, nur entfernt verwandtes wodurch ich mir rel. sicher bin, dass es irgendwas mit Keywords sein müsste: [url]https://supportnet.de/fresh/2006/7/id1385098.asp[/url] [url]http://www.xlam.ch/vbacode/vbacode.htm[/url] Wäre für eine rasche Lösung sehr dankbar.

Antwort 1 von coros

Hi Towelie,

in dem Beitrag des Supportnets, dessen Link Du hier gepostet hast, ist die Frage eigentlich durch Antwort 1 bereits beantwortet. Dort steht der Befehl

ActiveWorkbook.BuiltinDocumentProperties("Keywords")


doch schon dabei. Was ist daran jetzt nicht so, wie Du es Dir vorgestellt hast?

MfG,
Oliver
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein
Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.

Antwort 2 von Towelie

Naja den Befehl "ActiveWorkbook" alleine gibt es -verständliche weise- schon nicht in MS Project. Weiter komme ich gar nicht beim Kompilieren.

Ich hab ja auch versucht mit allen möglichen " Projects(1). " kombinationen oder anderen Befehlen, die ich da gefunden habe passendes zusammenzustellen, bin aber kläglich gescheitert.

Antwort 3 von coros

Hallo Towelie,

wozu benötigst Du das? Für VBA (Visual Basic for Application) in Excel oder für VB (Visual Basic)?

MfG,
Oliver
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein
Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.

Antwort 4 von Towelie

Das brauche ich für VB in MS Project. (VBA: Retail 6.4.9972)

vG
Alex

Antwort 5 von coros

Hallo ALex,

da bist Du hier etwas in der falschen Gruppe. Hier geht es um Excel und VBA.

Für VB würde der Code für ein StandardModul folgendermaßen aussehen:

Sub Stichwort_aus_Excel_auslesen()
Dim Excelprogramm As Excel.Application
Dim Datei As String
Set Excelprogramm = GetObject(, "Excel.Application")
Datei = "Hier den Dateinamen mit der Endung .xls"
MsgBox Excelprogramm.Workbooks(Datei).BuiltinDocumentProperties("Keywords")
End Sub


Damit das Makro funktioniert, musst Du den Verweis auf die "Microsoft Excel xx.x Object Library" setzen.

Ich hoffe, Du kommst klar. Bei Fargen melde Dich bitte wieder.

MfG,
Oliver
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein
Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.

Antwort 6 von Towelie

Hallo nochmal,

Also wie gesagt gehts mir hier nicht um MS-Exel sondern MS-Project aber VBA war es doch, die nutzen sogarn die gleiche Version nur weiß Project nichts mit Excel-VBA Befehlen wie Workbook anzufangen.

Ich dachte halt, da Project ja nur ein abgewandeltes Excel mit den Verknüfungen ist um Projecte besser zu planen und auch ein paar Zusatzansichten hat, dafür keine so eine Dynamische Oberfläche passt es hier rein ... und VBA is es ja auch.

Ich habe nun aber die Lösung gefunden: eh so einfach, hab mal kurz noch was probiert:

Projects(1).BuiltinDocumentProperties("Keywords")

Funktioniert einwandfrei. Auf jedenfall vielen Dank für deine Hilfe.

vG
Alex

Ich möchte kostenlos eine Frage an die Mitglieder stellen:


Ähnliche Themen:


Suche in allen vorhandenen Beiträgen: