|
VBasic : linien, drucker, arcuscosinus
pablo am 31.08.2003 um 20:33 Uhr (0)
Hallo fca_mi2 zu 3) Öffne eine Excel-Applikation, dann erhältst du mit dbl=ExlApp.Evaluate( ACOS(0.5) ) den Arcuscosinus (in rad). HTH pablo
|
| In das Form VBasic wechseln |
|
VBasic / vb.net / vbs / wsh : String ausrechnen
pablo am 12.11.2009 um 23:03 Uhr (0)
Hallo,gibt es in VB eine einfache vorhandene Möglichkeit, einen String auszurechnen?"16*5" würde reichen, "16*5+3" wäre nett.Mit dem XML-Parser oder einer Excel/Access - Applikation ist es mir zuaufwendig.pablo
|
| In das Form VBasic / vb.net / vbs / wsh wechseln |
|
VBasic / vb.net / vbs / wsh : Excel VBA: Falsche Adresse bei Range(...) erkennen
pablo am 16.09.2013 um 18:07 Uhr (1)
Klaus,die eigene Prozedur simuliert Try..catch...End Try.Falls das Makro komplett abschmiert kannst du mit: For Each TempName In Names If TempName.Name = SearchName Then NamedCellExists = True Exit For End If Nextüberprüfen ob die gesuchte Zelle vorhanden ist.pablo
|
| In das Form VBasic / vb.net / vbs / wsh wechseln |
|
VBasic : Excel - Anzahl der Rows
pablo am 09.09.2003 um 15:36 Uhr (0)
RoSiNiNo, mit ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Activate kannst du die letzte Spalte aktivieren. Mit ActiveSheet.UsedRange.Rows.Count geht es ohne Aktivieren. HTH pablo ------------------ mfG Gerald
|
| In das Form VBasic wechseln |
|
VBasic : Excel-Zugriff aus VB
pablo am 31.08.2003 um 20:20 Uhr (0)
Hallo Hobel, ExlApp.Cells(1,1)= s ergibt die Fehlermeldung 1004, weil die Texteigenschaft schreibgeschützt ist. s = ExlApp.Cells(1,1) klappt. Mit der Value Eigenschaft solltest du keine Probleme haben. Wenn die Fehlerbeschreibungen etwas weniger kryptisch wären, hätten wir alle weniger. HTH pablo
|
| In das Form VBasic wechseln |
|
VBasic : Excel Reactor
pablo am 09.09.2003 um 12:46 Uhr (0)
Hallo Exilgreis, ich würde so vor gehen: In eine beliebige Zelle (z.B. A12) die Reihe der letzten Eintragung schreiben. In der Prozedur des Events Worksheet_Change folgendes eintragen: If target.column=4 and target.row=me.cells(1,12) then me.cells(1,12)=me.cells(1,12)+1 Verschiebungsroutine auslösen end if Wenn die Z-Koordinate in einer neuen Reihe eingetragen wird, wird das Ereignis aktiviert. HTH pablo
|
| In das Form VBasic wechseln |
|
VBasic / vb.net / vbs / wsh : Excel VBA: Falsche Adresse bei Range(...) erkennen
pablo am 13.09.2013 um 17:36 Uhr (1)
Klaus,einfach geht es mit einer eigenen Funktion,Public Function GetFilePath(sPath As String, sVal As String) As Boolean On Error GoTo ErrorHandler sVal = Range(sPath)GetFilePath = TrueExit FunctionErrorHandler: Err.ClearEnd Functiondie du im eigentlichen Code aufrufst: If GetFilePath(sPath, sVal) Then ... end ifpablo
|
| In das Form VBasic / vb.net / vbs / wsh wechseln |
