|
Excel : Excel-Formatierung über VBA
Nepumuk am 20.02.2007 um 04:48 Uhr (0)
Hallo Robert,einfach so:Code:Public Sub prcFormatting() Dim objSheet As Worksheet, objCell As Range Dim strAddress As String Application.ScreenUpdating = False For Each objSheet In ThisWorkbook.Worksheets With objSheet.Cells .ClearFormats Set objCell = .Find(What:="Vorbereitung", LookAt:=xlWhole) If Not objCell Is Nothing Then strAddress = objCell.Address Do With objCell.Font .Bold = True .ColorIndex = 5 .Size = 12 End W ...
|
| In das Form Excel wechseln |
|
Excel : Jahr aus dem Datum herausnehmen
Nepumuk am 13.07.2006 um 22:43 Uhr (0)
Hallo Kristof,einfach nur =Jahr(A1)Daten werden in Excel als Zahl vom Typ Long geführt. Das beginnt am 1.1.1900 mit der Zahl 1. Dann kommt ein Fehler der einen Tag kostet (das Jahr 1900 war ein Schaltjahr hat aber in Excl nur 28 Tage). Dein Datum (1.5.2005) hat den Wert 38.473. Wenn du nun die rechten 4 Stellen nimmst (8.473) und wieder ein Jahr daraus machst, dann hast du das Datum 13.03.1923. Bei mir wird durch deine Formel auch 1923 berechnet und nicht 1921. Jetzt klar?------------------GrußNepumuk
|
| In das Form Excel wechseln |
|
Excel : Fehler bei Zugriff aus Excel auf Word
Nepumuk am 20.05.2006 um 09:20 Uhr (0)
Hallo Mario,von Verweisen auf Bibliotheken (early binding), welche Versionsabhängig sind, würde ich die Finger lassen. Wenn du Word über CreateObject (late binding) anlegst, kann es keine Konflikte mit Verweisen geben, die auf einem anderen Rechner nicht zur Verfügung stehen. Beispiel:Code:Public Sub test() Dim objWordApp As Object Set objWordApp = CreateObject("word.application") objWordApp.Documents.Open Filename:="D:Eigene DateienEigene Dokumente10019.doc" objWordApp.Visible = True Set objWordApp = ...
|
| In das Form Excel wechseln |
|
Excel : Checkboxen abfragen
Nepumuk am 26.02.2008 um 09:01 Uhr (0)
Hallo Ines,ja, das ist reines VBA. Wobei du etwas unterscheiden musst. VB = Visual Basic ein Programm mit dem ich .exe / .dll erstellen kann. VBA = Visual Basic for Application also an eine Anwendung aus Office wie Excel, Word usw. gebundenes VB. Die sind zwar von der Sprache fast identisch, bearbeiten aber unterschiedliche Objekte. In VBA eben Exceltabellen oder Worddokumente in VB alles worauf ich Zugriff bekomme. Denn VB hat außer seine eigenen Formulare keine eigenen Objekte. Alllerdings sind die ...
|
| In das Form Excel wechseln |
|
Excel : add in
Nepumuk am 02.05.2005 um 17:24 Uhr (0)
Hallo BJ, entschuldige, dass ich mich erst jetzt melde, habe eine furchtbare Woche hinter mir. Ich habe das jetzt auf verschiedenen Servern, mit vier verschiedenen Excelversionen getestet. Ich kann das nicht nachvollziehen. Das Addin wird ganz normal geladen, wenn ich Excel öffne. Auch nach einem Neustart des Systems war der Eintrag noch vorhanden und wurde ausgeführt. Eine Kontrolle der Registryeinträge, ergab auch keine Unstimmigkeiten. Die Pfade der Addins werden z.b. bei Excel2000 unter folgendem Pfad ...
|
| In das Form Excel wechseln |
|
AutoCAD VBA : Autocad aus Excel heraus ansprechen
Nepumuk am 20.02.2008 um 18:45 Uhr (0)
Hallo Wilfried,ich sag ja schon nix mehr. Nur ein kleiner Tipp. Die Konstanten sind ja nur Platzhalter für numerische Werte. Die Werte der Konstanten sind im Objektkatalog nachzuschlagen. Und jetzt kommts: Wesentlich schneller an ihren Wert kommst du, wenn du die Konstante mit einem vorangestellten Fragezeichen in das Direktfenster kopierst und Enter drückst. Beispiel:?vbRed 255 Die VB-Konstante vbRed kann also durch ihren Wert 255 ersetzt werden. Damit bist du wieder unabhängig von einem Verweis auf eine ...
|
| In das Form AutoCAD VBA wechseln |
|
Excel : Makro soll beim Speichern bestehende Dateien überschreiben
Nepumuk am 15.04.2006 um 13:31 Uhr (0)
Hallo Steffen,die "Automakros" stammen noch aus grauen Excel95 Zeiten und sollten nicht mehr benutzt werden. Die werden beim öffnen einer Mappe durch eine andere Anwendung nicht gestartet sondern müssen über die RunAutoMacros-Methode erst angestoßen werden. Dazu müsstest du aber Zugriff auf das Applicationobjekt bekommen. Benutze statt dessen die Ereignisroutinen von Excel. Rechtsklick auf das Excelicon neben Datei - Code anzeigen. Damit kommst du in das Klassenmodul der Mappe. In der linken Combobox über ...
|
| In das Form Excel wechseln |
|
Excel : Excel Datei eigenschaften
Nepumuk am 13.03.2006 um 22:09 Uhr (0)
Und für die Verfechter von "Late Binding":Code:Option ExplicitPublic Sub prcReadCustomProperty() Dim objFilePropReader As Object, objDocProp As Object, objCustProp As Object Dim objFSO As Object, objFile As Object Set objFilePropReader = CreateObject("DSOleFile.PropertyReader.1") Set objFSO = CreateObject("Scripting.FileSystemObject") For Each objFile In objFSO.GetFolder("D:Eigene DateienEigene Excelformeln").Files Set objDocProp = objFilePropReader.GetDocumentProperties(objFile.Path) For Each o ...
|
| In das Form Excel wechseln |
|
AutoCAD VBA : Automatischer Programmstart
Nepumuk am 18.02.2008 um 00:56 Uhr (0)
Hallo Ines,schon mal das versucht?Code:Set acApp = CreateObject("Autocad.Application")acApp.Visible = TrueSet acDoc = acApp.ActiveDocumentIch kanns nicht testen, ich hab kein AutoCAD.P.S. Öffnendialog geht auch ohne Excel.Code:Option ExplicitPrivate Declare Function GetFileNameFromBrowseW Lib "shell32.dll" Alias "#63" ( _ ByVal hwndOwner As Long, _ ByVal lpstrFile As Long, _ ByVal nMaxFile As Long, _ ByVal lpstrInitialDir As Long, _ ByVal lpstrDefExt As Long, _ ByVal lpstrFilter As Long, _ ByVal lps ...
|
| In das Form AutoCAD VBA wechseln |
|
Excel : VBA-Excel-Process-Kill-aus-Taskmanager
Nepumuk am 19.07.2007 um 17:35 Uhr (0)
Hallo,mal zwei Beispiele.1. Per API:Code:Option ExplicitPrivate Declare Function CreateToolhelpSnapshot Lib "kernel32" Alias "CreateToolhelp32Snapshot" ( _ ByVal lFlgas As Long, _ ByVal lProcessID As Long) As LongPrivate Declare Function TerminateProcess Lib "kernel32" ( _ ByVal hProcess As Long, _ ByVal uExitCode As Long) As LongPrivate Declare Function OpenProcess Lib "kernel32" ( _ ByVal dwDesiredAccess As Long, _ ByVal bInheritHandle As Long, _ ByVal dwProcessId As Long) As LongPrivate Declare F ...
|
| In das Form Excel wechseln |
