|
Excel : Excel-Datei soll nur mit aktivierten Makros zu öffnen sein
Axel.Strasser am 20.03.2006 um 12:08 Uhr (0)
Die Änderungsverfolgung von Excel reicht Dir nicht aus ? Da brauchst Du dann keine Makros. Mit einer Kombination des Blattschutzes sollte es dann auch möglich sein, dass die User es nicht wieder ausschalten können (hab ich aber nicht getestet)Axel
|
| In das Form Excel wechseln |
|
Excel : Datei zersplittern
Axel.Strasser am 15.08.2006 um 15:50 Uhr (0)
Naja ich hätte es halt im Applikationsbrett oder im OS Brett versucht Aber vielleicht hilft Dir das weiter: http://www.winsoftware.de/splitting,42,7605,12.htm Axel------------------Ich bin dabei am 19.9. und 20.9.06 beim5. CAD.de Anwendertreffen
|
| In das Form Excel wechseln |
|
Excel : Datei zersplittern
Axel.Strasser am 15.08.2006 um 15:51 Uhr (0)
Nancy 10 Us, Du warst schneller Axel------------------Ich bin dabei am 19.9. und 20.9.06 beim5. CAD.de Anwendertreffen
|
| In das Form Excel wechseln |
|
Excel : Excel Leseschutz
Axel.Strasser am 21.08.2007 um 09:46 Uhr (0)
Kannst ja eine Makro schreiben, dass beim Öffnen des Files abläuft und darin frägst Du die IP ab uns schliesset die Datei wieder wenn die entsprechende IP rauskommt.Axel
|
| In das Form Excel wechseln |
|
Excel : Code als Makro oder Schaltfläche
Axel.Strasser am 30.11.2007 um 16:51 Uhr (0)
Danke für Eure Antworten, wieder was dazugelernt.Wenn ich jetzt aber meinen Code anschaue:Code: Workbooks.OpenText Filename:=FilePath + Filename, Origin:=932, StartRow:=1, DataType:=xlDelimited, _ TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _ Semicolon:=True, Comma:=False, Space:=False, Other:=False, TrailingMinusNumbers:=True ActiveSheet.Range("A2:T1884").Copy Windows("Merging.xls").Activate Sheets("InputData").Range("A2").PasteSpecial Paste:=xlPasteValues, Operation: ...
|
| In das Form Excel wechseln |
|
Excel : Variablendeklaration
Axel.Strasser am 08.12.2007 um 12:13 Uhr (0)
In einer Excel Datei will ich drei Variablen deklarieren wenn die Arbeitsmappe geöffnet wirdich habe es über Code:Public TxtFilePath As StringPublic TxtFilename As StringPublic XlsFileName As StringPrivate Sub Workbook_Open() TxtFilePath = ThisWorkbook.Sheets("DefaultValues").Cells(1, 2).Value TxtFilename = ThisWorkbook.Sheets("DefaultValues").Cells(2, 2).Value XlsFileName = ThisWorkbook.NameEnd Subversucht. Leider werden die Variablen in den blattspezifischen Makros nicht erkannt. Was mach ich falsch ...
|
| In das Form Excel wechseln |
|
Excel : Schreiben von Zellen in eine Textdatei
Axel.Strasser am 16.12.2007 um 16:13 Uhr (0)
Aus einer grösseren Tabelle muss ich die werte in eine Textdatei schreiben. Dies mach ich mit:Code: LastRow = Sheets("Item").Cells(Rows.Count, 1).End(xlUp).Row Output Item Table For i = 1 To LastRow out.Write Sheets("Item").Cells(i, 1).Value For j = 2 To 45 out.Write vbTab & Sheets("Item").Cells(i, j) Next j out.Write vbCrLf Next i out.CloseJetzt sollte nur beim Schreiben der Datei das Format aus der Tabelle verwendet werden (z.B. mehre Felder sind Datumsfelder, jet ...
|
| In das Form Excel wechseln |
|
Excel : Text Datei bearbeiten
Axel.Strasser am 08.11.2007 um 17:19 Uhr (0)
Dein Quad kommt immer in der Datei vor und es ist immer alles zu löschen was darunter ist ?Versuche es halt mal als Basis mit dem Makro - Recorder. Erst mal in der ersten Spalte das Quad suchen, dann von da an bis Ende Tabelle alles selektieren und löschen, dann erste Spalte selektieren und löschen, zweite Spalte selektieren formatieren, dritte Spalte selektieren und formatieren. Dann solltest Du schon eine gute Basis haben um daraus ein allgemein gültiges Makro zu bauen.Axel Mal Quick and Dirty :Code:Sub ...
|
| In das Form Excel wechseln |
|
Excel : Text Datei bearbeiten
Axel.Strasser am 08.11.2007 um 21:30 Uhr (0)
Das Einlesen kannst Du ja mal mit diesem Konstrukt versuchen:Code: ChDir "C:Dokumente und EinstellungenAxelDesktop" Workbooks.OpenText Filename:= _ "C:Dokumente und EinstellungenAxelDesktopoutput.txt", Origin:=xlWindows, _ StartRow:=1, DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, _ ConsecutiveDelimiter:=True, Tab:=True, Semicolon:=False, Comma:=False, _ Space:=True, Other:=False, FieldInfo:=Array(Array(1, 1), Array(2, 1), Array(3 _ , 1), Array(4, 1)), TrailingMinusNumbers:=TrueAxel
|
| In das Form Excel wechseln |
|
Excel : Text Datei bearbeiten
Axel.Strasser am 08.11.2007 um 22:44 Uhr (0)
@Thomas: soweit ich erfahren habe mit 2007 nicht mehr , Kollege meinte er wäre mal in einer Tabelle runtergefahren und bei 1000000 hätte er dann aufgehört.Axel
|
| In das Form Excel wechseln |
|
Excel : Text Datei bearbeiten
Axel.Strasser am 09.11.2007 um 11:57 Uhr (0)
Gilbert, ich würde Excel die Arbeit machen lassen und die Datei ins Excel nehmen, dann hast Du das ganze Problem mit den Blanks nicht. Sonst musst Du Dich noch mit Trim und Such Funktion umeinanderschlagenAxel[Diese Nachricht wurde von Axel.Strasser am 09. Nov. 2007 editiert.]
|
| In das Form Excel wechseln |
|
Excel : Text und Zahlenumwandlung
Axel.Strasser am 08.02.2008 um 13:14 Uhr (0)
Kann man das automatische Umwandeln in das "E" - Format irgendwie unterbinden bzw die generelle Anzeige ändern ? Das Problem ist nämlich noch etwas weitgreifender. Ich lese eine Text Datei ein (alles über Makro), dabei werden mir die Textstrings schon umgewandelt, gut ich kann die Spalte gleich als Text einlesen. Dann werden sie "verwurschtelt", funktioniert soweit auch alles, nur dann finden Sie noch Verwendung in einer Pivot Tabelle. Und wenn ich dann da (auh wieder über Makro den Wert (formatiert als Te ...
|
| In das Form Excel wechseln |
|
Excel : Trennzeichen beim csv Export
Axel.Strasser am 15.01.2009 um 13:21 Uhr (0)
Kann man das Trennzeichen beim Erstellen einer csv Datei definieren (beim Import ist es klar).AxelExcel 2003 / 2007------------------Inoffizielle deutsche CATIA Hilfeseite
|
| In das Form Excel wechseln |
