|
Unigraphics : Excel
JoeG am 24.05.2006 um 07:36 Uhr (0)
Hallo schorschl, Variante 1 ist die genaue ÜbersetzungPublic Sub Variante1() If Range("A1").Value = 10101 Or Range("A1").Value = 10102 Then MsgBox "Ist richtig!!" Else MsgBox "Ist falsch!!" End IfEnd SubMit Variante 2 kannst du auf beide Zahlen unterschiedlich reagierenPublic Sub Variante2() Select Case Range("A1").Value Case Is = 10101 MsgBox "Zahl 10101 gefunden!!" Case Is = 10102 MsgBox "Zahl 10102 gefunden!!" Case Else MsgBox "keins gefunden!!" End SelectEn ...
|
| In das Form Unigraphics wechseln |
|
Unigraphics : Excel
JoeG am 18.05.2006 um 07:15 Uhr (0)
Hallomit Reset wird alles zurückgesetztEs wird die Default-Einstellung der Toolbar geladenmfgJoe
|
| In das Form Unigraphics wechseln |
|
Unigraphics : Excel
JoeG am 17.05.2006 um 07:21 Uhr (0)
Hallo SchorschWenn du den folgenden Code in VBA einfügst kannst du auf Speichern drücken bis du Schwarz wirst,gespeichert wird erst wenn in Zelle A1 der Text Ja steht!Viel Spaß damit!JoePrivate Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) If Sheets("Tabelle1").Range("A1").Value "Ja" Then Cancel = TrueEnd Sub
|
| In das Form Unigraphics wechseln |
|
Unigraphics : Excel
JoeG am 17.05.2006 um 15:37 Uhr (0)
Hallo schorschldas sieht dann so aus Application.CommandBars("File").Controls("Speichern").Enabled = False Application.CommandBars("File").Controls("Speichern unter...").Enabled = False Application.CommandBars("File").ResetmfgJoe
|
| In das Form Unigraphics wechseln |
|
Unigraphics : Excel
JoeG am 17.05.2006 um 13:42 Uhr (0)
Hallo schorschl1) Das ausschalten bzw. ausblenden der Schaltfläche Visible und Enabled gemacht. Application.CommandBars("Standard").Controls("Speichern").Visible = True Application.CommandBars("Standard").Controls("Speichern").Enabled = False2) Das ändern der Aktion ist da schon eine andere Sache Mit OnAction kann man eine Sub angeben die dann ausgeführt wird, mit Reset werden alle Änderungen an der Toolbar wieder gelöscht. Das Icon ändern hab ich leider auf die schnelle nicht gefunden, den Infotext ...
|
| In das Form Unigraphics wechseln |
|
Autocad VBA : copy Funktion AutoCAD-Excel
JoeG am 02.12.2004 um 13:41 Uhr (0)
Hallo versuch es mal so Public Sub Excel_zugreifen() Dim Excel As Excel.Application Dim ExcelSheet As Object Dim ExcelWorkbook As Object Excel starten Set Excel = New Excel.Application Excel.Visible = True Vorlage öffnen Workbooks.Open FileName:= C:Test.xls , ReadOnly:=True Sheets( Tabelle1 ).Copy After:=Sheets(Sheets.Count) End Sub den Excel-Verweis nicht vergessen!!! Joe
|
| In das Form Autocad VBA wechseln |
|
VBasic : Excel
JoeG am 07.11.2002 um 07:31 Uhr (0)
Hallo Mike Ich habe die drei Möglichkeiten die mir bekannt sind in ein Excel-File zusammengefaßt. Vielleicht helfen sie dir. Du kannst die natürlich auch untereinander kombinieren. Die dritte Möglichkeit ist etwas umständlich aber man kann damit am meisten herum spielen und sie den eigen Vorstellungen anpassen. Gruß Joe
|
| In das Form VBasic wechseln |
|
Autocad VBA : Speicherort der DVB-Datei
JoeG am 26.09.2003 um 09:08 Uhr (0)
Wie findet man den Speicherort der DVB-Datei heraus?? In Excel wird der Pfad mit „ThisWorkbook.Path“ ausgegeben. Weis jemand wie das in Autocad VBA geht?
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : punkte kugeln
JoeG am 15.10.2004 um 11:09 Uhr (0)
Kleiner Fehler Was ist denn eine DSV-Datei? Startrek hat recht es war *.CSV gemeint Un warum der Umweg? Ich kenne leider kein Programm mit dem man eine Befehlszeile für so viele Punkte halbwegs schnell zusammenstellen kann, ausgenommen Excel.
|
| In das Form Autocad VBA wechseln |
|
VBasic : Excel
JoeG am 06.11.2002 um 13:38 Uhr (0)
Ich verstehe nicht ganz was du mit „ja, nein oder Stück, Paar „ meinst!! Ab du kannst die Verbindung mit eine Zelle herstellen indem du der Zelle einen Namen gibst. Einfügen - Namen - Festlegen Danach kannst du mit der Funktion „Range„ dieser Zelle einen Wert zuweisen. ZB. Range(„Zelle1“).Value=“Hallo, Welt“ Gruß Joe
|
| In das Form VBasic wechseln |
|
Autocad VBA : punkte kugeln
JoeG am 14.10.2004 um 07:17 Uhr (0)
Hallo renebus Wenn das eine einmalige Sache ist versuch es mahl so, ansonsten wirst du um ein kleines VBA-Programm nicht herumkommen. Ein Befehlsscript erzeigen: Die Textdatei hab ich in Excel geöffnet da kann man die restlichen Befehle gut ergänzen. Die Zeile könnte so aussehen: Kugel 10,15,1 10 Das ganze dann als DSV-Datei speichern und in *.scr umbenennen. Mit einem Texteditor die Trennzeichen gegen ein LEER ersetzen und in Autocad laden. In VBA ist das auch nicht allzu aufwendig meld dich einfach we ...
|
| In das Form Autocad VBA wechseln |
