Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

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
GELÖST

Office 2010 - VB Script, Beim öffnen einer ModifiedFormPage IF-Schleife einfügen - geht das?

Frage Entwicklung VB for Applications

Mitglied: TSkott

TSkott (Level 1) - Jetzt verbinden

14.03.2011, aktualisiert 16.03.2011, 4385 Aufrufe

Edit: Habe es durch Function Item_Open() geschafft. Herrje, ich bin echt n Anfänger

Moin!

Ich versuche gerade mit Outlook 2010 ein persönliches Kontaktformular zu erstellen. Dabei habe ich folgendes Problem:
Ich habe sehr viele TextBoxen, da viele Daten aufgenommen werden sollen. Damit es übersichtlicher wirkt, kann man nach dem ersten Block einen weiteren hinzufügen. Dies habe ich durch die Eigenschaft
Textbox1.visible = true
in Verbindung mit einem CommandButton geschafft.

Wenn man nun jedoch Daten einträgt, speichert und das Formular schließt werden sie beim nächsten Öffen nicht angezeigt. Es muß zuerst der CommandButton geklickt werden um jene Dateien zu sehen. Ich habe nun einen neuen CommandButton mit folgendem Code eingefügt.

01.
Sub ZeigenButton1_Click() 
02.
     Set Kontaktart1 = Item.GetInspector.ModifiedFormPages("Kontakte").Controls("Combo_Kontaktart1") 
03.
 
04.
     if Kontaktart1.text = "" then 
05.
               Kontaktart1.visible = false 
06.
          else cb1_Add1_Click() 
07.
     end if

Somit wird geprüft ob in dem jewiligen Block Informationen stehen und gegebenfalls angezeigt.

Ich frage mich nun ob es nicht einfach möglich ist, Outlook beim Öffnen des ModifiedFormPages("Kontakte") diese Abfrage automatisch durchführen zu lassen.


Bitte entschuldigt, falls dies nicht annähernd zu den Problemen gehört, die Ihr sonst löst. Ich bin ein total Anfänger und habe mich selbst reingelesen. Eine leichte Lösung wäre sehr nett, etwa wie:
Sub ModifiedFormPages("Kontakte")_open() -funktioniert leider nicht ;)

Vielen Dank für Eure Aufmerksamkeit!!
Ähnliche Inhalte
VB for Applications
gelöst VB-Script per Aufgabenplanung (2)

Frage von S4kar97 zum Thema VB for Applications ...

Windows Server
Sharepoint - öffnen im Windows Explorer geht nicht (5)

Frage von DerWoWusste zum Thema Windows Server ...

Linux Tools
gelöst Linux Script mit dreifacher If Abfrage verschachteln (9)

Frage von OIOOIOOIOIIOOOIIOIIOIOOO zum Thema Linux Tools ...

RedHat, CentOS, Fedora
gelöst Ausgabe mit IF auswerten (8)

Frage von OIOOIOOIOIIOOOIIOIIOIOOO zum Thema RedHat, CentOS, Fedora ...

Neue Wissensbeiträge
Viren und Trojaner

Neues Botnetz über IoT-Geräte

Information von certifiedit.net zum Thema Viren und Trojaner ...

Ubuntu

Ubuntu 17.10 steht zum Download bereit

(3)

Information von Frank zum Thema Ubuntu ...

Datenschutz

Autofahrer-Pranger - Bewertungsportal illegal

(8)

Information von BassFishFox zum Thema Datenschutz ...

Windows 10

Neues Win10 Funktionsupdate verbuggt RemoteApp

(8)

Information von thomasreischer zum Thema Windows 10 ...

Heiß diskutierte Inhalte
Router & Routing
Externe IP von innen erreichbar machen (15)

Frage von Windows10Gegner zum Thema Router & Routing ...

Windows Installation
Windows 10 neu installieren (12)

Frage von imebro zum Thema Windows Installation ...

Windows Server
Frage zu Server Rack (11)

Frage von rainergugus zum Thema Windows Server ...