|
Excel : Text Datei bearbeiten
G. Dawg am 09.11.2007 um 13:35 Uhr (0)
Zitat:Original erstellt von bst:Code:Print #intOutHandle, re.Replace(strOneLine, "")Hat bei mir nicht funktioniert. EDIT:So gehts:Code: strOneLine = re.Replace(strOneLine, "") Print #intOutHandle, strOneLine------------------ [Diese Nachricht wurde von G. Dawg am 09. Nov. 2007 editiert.]
|
| In das Form Excel wechseln |
|
Excel : Text Datei bearbeiten
bst am 09.11.2007 um 13:58 Uhr (0)
Hi,kann ich nicht nachvollziehen. Bei mir hier geht das auch direkt.CU, Bernd
|
| In das Form Excel wechseln |
|
Excel : Text Datei bearbeiten
G. Dawg am 09.11.2007 um 14:04 Uhr (0)
Er hat einfach nichts in die Datei geschrieben?!? Keine Ahnung!Hier ist, was ich bis jetzt habe!Es gibt noch ein paar kleine Anpassungen ist aber soweit sehr viel besser, als das was ich heute Morgen hatte!Code:Option Explicit declarations, used windows API calls and constants Deklarationen, benötigte Windows API-Calls und KonstantenPublic Enum swLengthUnit_e swMM = 0 swCM = 1 swMETER = 2 swINCHES = 3 swFEET = 4 swFEETINCHES = 5 swANGSTROM = 6 swNANOMETER = 7 swMICRON = 8 swMIL = 9 swUIN = 10End ...
|
| In das Form Excel wechseln |
|
Excel : Text Datei bearbeiten
bst am 09.11.2007 um 14:42 Uhr (0)
Hmm,kein Plan. Da re.Replace einen String zurückliefert sollte das eigentlich immer gehen.Übrigens, Was willst Du denn mit "Private Declare Function GetSaveFileName" ?In Excel gibt es "Application.GetOpenFilename" sowie "Application.GetSaveAsFilename", siehe VBA-Hilfe dazu.CU, Bernd
|
| In das Form Excel wechseln |
|
Excel : Text Datei bearbeiten
G. Dawg am 09.11.2007 um 14:46 Uhr (0)
Das glaub ich ja nicht! Ich habe den Schnippsel aus einem Makro für SolidWorks, desshalb vermutlich! Muss ich gleich mal ausprobieren!Sieht ja 10000x einfacher aus!------------------
|
| In das Form Excel wechseln |
|
Excel : Text Datei bearbeiten
Thomas Harmening am 09.11.2007 um 15:10 Uhr (0)
hmm, ja,mein Code ist irgendwie chaotisch, Bernds Vorschlag ist da wohl durch strukturiert - ein Glück, das ich mit dem Programmieren kein Geld verdienen muss^^deinen Dialog könntest du so abändern Code:intInpHandle = FreeFile ChDrive "c: empfürer" IVPResultFile = Application.GetOpenFilename("IVP Result File (*.res),*.res") call OpenFile Dialog box If IVPResultFile = False Then Exit Sub Open IVPResultFile For Input As #intInpHandle intOutHandle = FreeFile IVPoutput = Left(IVPResultFile, Len(IVPResultFile ...
|
| In das Form Excel wechseln |
|
Excel : Text Datei bearbeiten
G. Dawg am 09.11.2007 um 15:36 Uhr (0)
Das ist aber auch ganz schön, Thomas!Da wird doch glatt eine neue .txt (mit dem richtigen Namen! ) in das gleiche Verzeichnis gespeichert!Plus, ich habe einen Schritt gespart! Datei auswählen, Start drücken. Nun startet er direkt nach dem Auswählen! ------------------
|
| In das Form Excel wechseln |
|
Excel : Text Datei bearbeiten
Thomas Harmening am 09.11.2007 um 15:55 Uhr (0)
ich vergass noch, dass man das Verzeichnis vordefinieren kannChDrive "c: empfürer"ist im obigen Code nachgezogen worden.;-) Makrotechnisch lässt sich das auch realisieren, dass immer auf das aktuellste *.res im Verzeichnis xy zugegriffen wird, dann müsstest du nur die xl-mappe aufrufen ;-) oder halt gleich den Code als Windows Scripting Host (WSH) -dann braucht man Excel nicht ;-)
|
| In das Form Excel wechseln |
|
Excel : Text Datei bearbeiten
G. Dawg am 09.11.2007 um 16:03 Uhr (0)
Gute Idee, brauch ich aber nicht Da die Daten nur zum ausprobieren in meinem temp sind.Bin noch an der Fehlerabfrage und dann werde ich das Script nochmals hier hinstellen - Für die, die es interessiert.Wünsche allen ein schönes Wochende!------------------
|
| In das Form Excel wechseln |
|
Excel : Text Datei bearbeiten
G. Dawg am 09.01.2008 um 13:29 Uhr (0)
So!Endlich habe ich eine einigermassen funktionstüchtige Version meines Makros!-- Siehe Anhang, Makro mit Beispieldateien.Einziges Problem ist noch, wenn die erste Reihe in X Achse eine negative Zahle ist (z.b. -0.01) und die nächste Zahl positiv ist (0.01) bricht das Programm ab!Ich weiss woran es liegt, aber ich weiss nicht wie ich es beheben kann! Ich habe einen Bias von 1mm der mir sicherstellt, dass wirklich nur die Kontur übernommen wird... Eigentlich sollte es nie einen negativen Wert für die X Achs ...
|
| In das Form Excel wechseln |
|
Excel : Daten in externe Datei schreiben oder in Excel Tabelle speichern?
kingmar am 10.01.2005 um 16:31 Uhr (0)
Hallo Leute, da ich erst neu im VBA Gebiet bin, hab ich folgenden Frage. Wie kann man Daten die ich laut einer Berechung bekomme in eine externe Datei schreiben oder in Excel in Tabellenform bringen.?Und zwar geht es um die Berechnung einer Ladung und Entladung eines Kondensators. i(t) und uc(t) sollen demnach in einer solchen Tabelle oder externen Tabelle erscheinen. Die benötigten Daten werden in eine Excel Tabelle eingegeben wie Uq usw. und dann folgt die Berechung und das schreiben in die Datei...aber ...
|
| In das Form Excel wechseln |
|
Excel : Schriftkopf in Excel-Datei
Amnisha am 29.09.2006 um 09:44 Uhr (0)
Also zuerst muß ich sagen, dass ich so gut wie nie mit Excel arbeite. Ich hab mal kleine Tabellen erstellt und auch mal Listen geplottet. Das war´s dann aber auch. Nun habe ich hier schon die Suche bemüht und Schriftkopf oder Stempel eingegeben aber leider nichts gefunden.Ich möchte in Listen, die ich von meinem Kollegen gemailt bekomme einen Schriftkopf rechts unten einfügen, genau wie das in einer Zeichnung üblich ist. Ich habe mir einen Schriftkopf erstellt, mit Logo unserer Firma und den wichtigs ...
|
| In das Form Excel wechseln |
|
Excel : Schriftkopf in Excel-Datei
CADdog am 29.09.2006 um 09:53 Uhr (0)
Hallo,das was du da vorhast, würde ich mit einem Textfeld oder in der Fußzeile machen,------------------ gruß CADdog, the dog formerly known as TRAutoCAD spricht mit einem, aber viele hören nicht zu.
|
| In das Form Excel wechseln |
