von Peter hat eine Frage » Mi, 23.08.2017 21:03
Hallo Stephan,
Besten Dank! Die einzelnen Zellinhalte werden gefunden, dann diese Fehlermeldung:
BASIC-Laufzeitfehler.
Es ist eine Ausnahme aufgetreten
Type: com.sun.star.task.ErrorCodeIOException
Message: SfxBaseModel::impl_store <
http://20170002-Rechnung-Schlaier-23.08.17.ods/> failed: 0x5032.
Bei der Fehlermeldung öffnet sich das Basic Fenster, ein Pfeil zeigt auf die letzte Zeile:
ThisComponent.storeAsUrl(ConvertToURL(tmp), Array())
Hier muss der Fehler liegen, ich kann nichts erkennen.
Code: Alles auswählen
Sub Main
blatt = ThisComponent.CurrentController.ActiveSheet
With blatt
tmp = .getCellRangeByName("B31").String
tmp = tmp & .getCellRangeByName("B22").String
tmp = tmp & .getCellRangeByName("A5").String
tmp = tmp & .getCellRangeByName("B22").String
tmp = tmp & .getCellRangeByName("C17").String
tmp = tmp & .getCellRangeByName("B22").String
tmp = tmp & .getCellRangeByName("K31").String & ".ods"
End With
ThisComponent.storeAsUrl(ConvertToURL(tmp), Array())
End Sub
Hallo Stephan,
Besten Dank! Die einzelnen Zellinhalte werden gefunden, dann diese Fehlermeldung:
BASIC-Laufzeitfehler.
Es ist eine Ausnahme aufgetreten
Type: com.sun.star.task.ErrorCodeIOException
Message: SfxBaseModel::impl_store <http://20170002-Rechnung-Schlaier-23.08.17.ods/> failed: 0x5032.
Bei der Fehlermeldung öffnet sich das Basic Fenster, ein Pfeil zeigt auf die letzte Zeile:
ThisComponent.storeAsUrl(ConvertToURL(tmp), Array())
Hier muss der Fehler liegen, ich kann nichts erkennen.
[code]Sub Main
blatt = ThisComponent.CurrentController.ActiveSheet
With blatt
tmp = .getCellRangeByName("B31").String
tmp = tmp & .getCellRangeByName("B22").String
tmp = tmp & .getCellRangeByName("A5").String
tmp = tmp & .getCellRangeByName("B22").String
tmp = tmp & .getCellRangeByName("C17").String
tmp = tmp & .getCellRangeByName("B22").String
tmp = tmp & .getCellRangeByName("K31").String & ".ods"
End With
ThisComponent.storeAsUrl(ConvertToURL(tmp), Array())
End Sub[/code]