Bei letzterem stockt einem der Atem, so schnell ist das Teil.
häää..... nicht nur da, auch in der 32dreiziger geht es ab wie ein Blitz.
Sjouke Hamstra hat geschrieben:September 2007 Upgrade
GFA-BASIC 32 has been upgraded to v2.30.1163.
What's new:
* Resolved bug of disappearing mouse cursor in margin (build 1162)
* An additional pixel between lines for better readability
* "Find backwards with Match Case selected" bug resolved.
Sjouke Hamstra
The GFA-BASIC 32 Home: http://gfabasic32.googlepages.com
Code: Alles auswählen
Dim ExcelSheet As Object
Set ExcelSheet = CreateObject("Excel.Sheet")
// bereitstellen
ExcelSheet.Application.Visible = True
// und den Zugriff auf eine Zelle + Eingabe
ExcelSheet.Cells(3, 5).Value = "Spalte C, Zeile 5"
// speichern
ExcelSheet.SaveAs "C:\ testdat.doc"
// verlassen
ExcelSheet.Application.Quit
// frei geben der Objektvariable.
Set ExcelSheet = Nothing
Falko hat geschrieben:Und bei dir läuft dieses Beispiel auf der Hilfe?
Code: Alles auswählen
Dim EA As Object ' ExcelApplication
Dim WB As Object ' WorkBook
Dim WS As Object ' WorkSheet
Set EA = CreateObject("Excel.Application")
EA.Visible = True
Const xlWorksheet = -4167
Set WB = EA.Workbooks.Add(xlWorksheet)
Set WS = WB.Worksheets(1)
WS.Cells(5, 3).Value = "Spalte C, Zeile 5"
' oder so:
' WS.Range("C5") = Array("Spalte C, Zeile 5")
EA.Quit
Set WS = Nothing
Set WB = Nothing
Set EA = Nothing
yup, ist für mich momentan auch das Ausschlusskriterium. Das OCX mussFalko hat geschrieben:Nur einen großen Nachteil hat GFA-Basic. Man muss immer die 1MB große
OCX mitkopieren, daher bleibe ich lieber bei PB.
Ich bin mal gespannt, da sich nun jemand drum kümmert, hoffe ich auchKiffi hat geschrieben:...
Aber vielleicht wird das noch im Rahmen der Weiterentwicklung irgendwann
mal geändert.
Grüße ... Kiffi