Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

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

VBScript Next For Schleife

Frage Entwicklung VB for Applications

Mitglied: waldgnarf

waldgnarf (Level 1) - Jetzt verbinden

28.08.2008, aktualisiert 17:01 Uhr, 5609 Aufrufe, 2 Kommentare

Hallo, ich habe in meimem Script versucht den Wert einer Zelle in einem odt Dokument abzufragem, was auch super funktioniert aber dann wollte ich im Dokument den Wert der nächsten Zelle abfragen wenn in der ersten etwas steht und so weiter, bis eine leehre Zelle kommt.
In die leehre Zelle soll dann ein Text rein, der Array funktioniert aber nicht weil Do While oder For Eatch In ... noch vor If Not rein muss, weiss leider nicht wie ichs genau Impletieren muss.
Kann mir da bitte wer Helfen?
01.
Set SSM=WScript.CreateObject("com.sun.star.ServiceManager") 
02.
Set DESKTOP=SSM.createInstance("com.sun.star.frame.Desktop") 
03.
Set CALC=DESKTOP.loadComponentFromURL("file:///C:/Documents and Settings/psi.HP-P-T3257/Desktop/ODS/TEST.ods", "_blank", 0, Array()) 
04.
Set SHEET=CALC.getSheets().getByName("A1") 
05.
POSY=0 
06.
POSX=0 
07.
 
08.
Set ZELLE=SHEET.getCellByPosition(POSY, POSX) 
09.
INHALT=ZELLE.getFormula() 
10.
 
11.
If Not INHALT="" Then 
12.
POSY=POSY+1 
13.
Set ZELLE=SHEET.getCellByPosition(POSY, POSX) 
14.
INHALT=ZELLE.getFormula() 
15.
Else 
16.
Call SHEET.getCellByPosition(POSY, POSX).setFormula("2") 
17.
End If
Gruß waldgnarf
Mitglied: bastla
28.08.2008 um 10:09 Uhr
Hallo waldgnarf!

Das sollte etwa so aussehen:
01.
Set SSM=WScript.CreateObject("com.sun.star.ServiceManager") 
02.
Set DESKTOP=SSM.createInstance("com.sun.star.frame.Desktop") 
03.
Set CALC=DESKTOP.loadComponentFromURL("file:///C:/Documents and Settings/psi.HP-P-T3257/Desktop/ODS/TEST.ods", "_blank", 0, Array()) 
04.
Set SHEET=CALC.getSheets().getByName("A1") 
05.
POSY=0 
06.
POSX=0 
07.
 
08.
Do 
09.
    Set ZELLE=SHEET.getCellByPosition(POSY, POSX) 
10.
    INHALT=ZELLE.getFormula() 
11.
    If INHALT="" Then Call SHEET.getCellByPosition(POSY, POSX).setFormula("2") 
12.
    POSY=POSY+1 
13.
Loop Until INHALT="" 
14.
POSY=POSY-1 'falls die Zeilennummer der (vormals) leeren Zeile noch benötigt wird
Grüße
bastla
Bitte warten ..
Mitglied: waldgnarf
28.08.2008 um 17:01 Uhr
Passt super, vielen Dank!

Gruß waldgnarf
Bitte warten ..
Ähnliche Inhalte
Batch & Shell
Verschachtelte For Schleife für Batch Neuling (3)

Frage von yperiu zum Thema Batch & Shell ...

Firewall
Empfehlung Next Generation Firewall (3)

Frage von Axel90 zum Thema Firewall ...

Batch & Shell
gelöst Verlinkung erstellen Batch Datei mit for Schleife (2)

Frage von rusdav zum Thema Batch & Shell ...

Visual Studio
gelöst VBScript und WMI (Win32-NetworkAdapterConfiguration) (3)

Frage von MaxMoritz6 zum Thema Visual Studio ...

Neue Wissensbeiträge
Google Android

Cyanogenmod alternative Downloadquelle

(2)

Tipp von Lochkartenstanzer zum Thema Google Android ...

Batch & Shell

Batch als Dienst bei Systemstart ohne Anmeldung ausführen

(5)

Tipp von tralveller zum Thema Batch & Shell ...

Sicherheits-Tools

Sicherheitstest von Passwörtern für ganze DB-Tabellen

(1)

Tipp von gdconsult zum Thema Sicherheits-Tools ...

Heiß diskutierte Inhalte
Windows 7
gelöst Lokales Adminprofil defekt (25)

Frage von Yannosch zum Thema Windows 7 ...

Server
gelöst Wie erkennen, dass nur deutsche IPs Zugang zu einer Website haben? (22)

Frage von Coreknabe zum Thema Server ...

LAN, WAN, Wireless
gelöst Statische Routen mit ISC-DHCP Server für Android Devices (22)

Frage von terminator zum Thema LAN, WAN, Wireless ...

Exchange Server
gelöst Migration Exchange 2007 zu 2013 - Public Folder teilweise weg (16)

Frage von Andy1987 zum Thema Exchange Server ...