Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Textfeld 7 stellen kopieren

Frage Entwicklung VB for Applications

Mitglied: Webbi

Webbi (Level 1) - Jetzt verbinden

12.10.2010 um 08:32 Uhr, 2608 Aufrufe, 7 Kommentare

Textfeld mit x stellen auslesen und in neues Dokument einfügen

Hallo

Bin gerade dabei ein Makro in Word zu schreiben und scheitere gerade an einem Problem.

Ich habe ein Formular mit 6 Feldern (Vorname, Nachname, Passwort, usw.)

Wenn ich dieses Formular ausfülle möchte ich mit diesen Daten ein anderes Formular füllen und ausdrucken.
Das befüllen und ausdrucken funktioniert auch.

Allerdings habe ich in dem Dokument ein Feld, was nur zum Teil mit Daten befüllt werden soll und da habe ich keine
Ahnung wie ich das machen muss.

Aus dem Formular möchte ich von "vorname" NUR den ersten Buchstaben und von "nachname" max 7 Buchstaben
in das Dokument schreiben.

Die Felder kopiere ich bisher mit dem Befehl:

wDoc.FormFields("vorname").Result = oDoc.FormFields("vorname").Result

Habt Ihr eine Idee, wie ich das lösen kann.
Ich hoffe, dass ich das Verständlich erklärt habe - ansonsten einfach nachfragen, wenn ihr mehr Infos benötigt.

Webbi
Mitglied: BigWim
12.10.2010 um 08:51 Uhr
Such mal nach einer Funktion namens Left oder Links.

Die genaue Syntax kann ich jetzt nicht nachsehen, aber sinngemäß so

01.
wDoc.FormFields("vorname").Result = Left(oDoc.FormFields("vorname").Result;7)
Markus
Bitte warten ..
Mitglied: 76109
12.10.2010 um 09:14 Uhr
Hallo Webbi!

Wobei in der Syntax von BigWim das Semikolon durch ein Komma zu ersetzen wäre und für Vorname die Ziffer 1 und für Nachname die Ziffer 7 zu verwenden ist

Gruß Dieter
Bitte warten ..
Mitglied: Webbi
12.10.2010 um 12:25 Uhr
Hallo

Vielen Dank schon einmal für eure Hilfe.

Habe diese Codezeile mal eingefügt:

wDoc.FormFields("benutzername").Result = Left(oDoc.FormFields("vorname").Result, 1) & Left(oDoc.FormFields("nachname").Result, 7)

Allerdings ohne Erfolg. Habt ihr da noch eine Idee?

Webbi
Bitte warten ..
Mitglied: Webbi
12.10.2010 um 13:49 Uhr
Hallo Leute

Es funktioniert. Hatte es nicht richtig gespeichert!
Formular war beim speichern vom Makro geschützt und deshalb hat das wohl nicht geklappt.

Jetzt geht es - vielen Dank für die Hilfe.

Jetzt muss ich nur noch herausfinden, wie ich beim Ursprungsformular die Textfelder zurücksetze.

Das hier ist wohl noch nicht ganz richig:
Set oDoc = ActiveDocument
ActiveDocument.ResetFormFields

Webbi
Bitte warten ..
Mitglied: BigWim
12.10.2010 um 14:17 Uhr
Jetzt muss ich nur noch herausfinden, wie ich beim Ursprungsformular die Textfelder zurücksetze.

01.
oDoc.FormFields("vorname").Result = ""
vielleicht so?



Markus
Bitte warten ..
Mitglied: Webbi
12.10.2010 um 15:30 Uhr
Hi

Das ist nicht schlecht, bedeutet aber ja 6 Zeilen Script.

Von meinem bisherigen Stand der Programmierung sollte man die Scripte so kurz wie möglich halten.

Gibt es nicht so etwas wie?

oDoc.FormFields(*).Result = ""

Webbi
Bitte warten ..
Mitglied: Biber
12.10.2010 um 16:25 Uhr
Moin Webbi,

Zitat von Webbi:
Hi

Das ist nicht schlecht, bedeutet aber ja 6 Zeilen Script.

Von meinem bisherigen Stand der Programmierung sollte man die Scripte so kurz wie möglich halten.
Wer oder was hat dir denn so etwas erzählt??
Nach dieser Ultraplattregel wären unkommentierte Codeschnipsel besser als kommentierte.
Und 10 Oneliner besser als 100 Codezeilen, die einen geschlossenen Algorithmus beinhalten.


Gibt es nicht so etwas wie?

oDoc.FormFields(*).Result = ""
Doch, aber natürlich nicht in der Form, dass jedem (egal ob Text, Datums- oder Währungs-) Feld blind ein Leerstring zum Fressen gereicht wird.
Du hast es doch in deinem vorletzten Kommentar schon in der Hand gehabt, oder?

Grüße
Biber
Bitte warten ..
Ähnliche Inhalte
Windows 7
Automatischens Markieren von Textfeldern Windows 7
Frage von MantigulWindows 72 Kommentare

Hallo zusammen. seitdem wir bei uns ein neues aktuelles Image für die Windows Installation erstellt haben funktioniert bei einem ...

Batch & Shell
Kopieren anhand der ersten 4 Stellen des Dateinamens
gelöst Frage von RitzratzBatch & Shell2 Kommentare

Hi, ich möchte verschiedene Dateien anhand der ersten 4 Buchstaben identifizieren und dann in unterschiedliche Netzlaufwerke speichern. Die Dateinamen ...

Linux
Script um Zeilen aus einer Datei an eine bestimmte Stelle in einer anderen Datei zu kopieren
Frage von grepper91Linux2 Kommentare

Hallo zusammen, ich habe folgendes Problem, ich habe Paketlisten die ungefähr so aussehen: ;Paket1;x86_64;;;# ;Paket2;x86_64;;;# ;Paket3;x86_64;;;# Nun habe ich ...

Drucker und Scanner
Druckertreiber kopieren von einem Windows 7 zum anderen
gelöst Frage von 114068Drucker und Scanner9 Kommentare

Hallo, habe einen Benutzer, der unbedingt auf "seinem" alte Canon-Drucker drucken will, um umweltbewusst seinen gehortete Tintenvorrat von 40 ...

Neue Wissensbeiträge
MikroTik RouterOS

Mikrotik - Lets Encrypt Zertifikate mit MetaROUTER Instanz auf dem Router erzeugen

Anleitung von colinardo vor 4 StundenMikroTik RouterOS4 Kommentare

Einleitung Folgende Anleitung ist aus der Lage heraus entstanden das ein Kunde auf seinem Mikrotik sein Hotspot Captive Portal ...

Sicherheit

Sicherheitslücke in HP-Druckern - Firmware-Updates stehen bereit

Information von BassFishFox vor 4 StundenSicherheit

Ein weiterer Grund, dass Drucker keinerlei Verbindung nach "auswaerts" haben sollen. Unter Verwendung spezieller Malware können Angreifer aus der ...

Administrator.de Feedback

Entwicklertagebuch: Die Startseite wurde überarbeitet

Information von admtech vor 6 StundenAdministrator.de Feedback6 Kommentare

Hallo Administrator User, mit dem Release 5.7 haben wir unsere Startseite überarbeitet und die Beiträge und Fragen voneinander getrennt. ...

Vmware

VMware Desktopprodukte sind verwundbar

Information von Penny.Cilin vor 11 StundenVmware

Die VMware-Anwendungen zum Umgang mit virtuellen Maschinen Fusion, Horizon Client und Workstation sowie die Plattform NSX sind verwundbar. Davon ...

Heiß diskutierte Inhalte
Visual Studio
Vb.net-Tool zum Erzeugen einer Outlook-E-Mail
Frage von ahstaxVisual Studio24 Kommentare

Hallo, ich möchte gerne ein vb.net-Tool schreiben, das am Ende eine Outlook-E-Mail erzeugt. Grundsätzlich ist mir klar, wie das ...

Windows Netzwerk
Netzwerk Neustrukturierung
Frage von IT-DreamerWindows Netzwerk16 Kommentare

Hallo verehrte Community und Admins, bei uns im Haus steht eine Neustrukturierung an. Dafür benötige ich von euch ein ...

Windows Server
RDP macht Server schneller???
Frage von JaniDJWindows Server16 Kommentare

Hallo Community, wir betrieben seit geraumer Zeit diverse virtuelle Maschinen und Server mit Windows Server 2012. Leider haben wir ...

Windows 10
Windows 10 dunkler Bildschirm nach Umfallen
Frage von AkcentWindows 1015 Kommentare

Hallo, habe hier einen Windows 10 Rechner der von einem User umgefallen wurde (Beine übers Knie, an den PC ...