|
Excel : Excel ComandButton mit Passwort
Thomas Harmening am 04.11.2011 um 19:04 Uhr (0)
ja,ja, ich weiss bin mal wieder viel zu spät ;-)wozu Blattschutz aufheben ;-) unten stehender Code fingert nicht an irgendwelchen Blattschutz(~e(n))[~gibt es ein Plural von Blattschutz? ] rum.Code:Sub test()Dim ws As WorksheetDim pt As PivotTableActiveSheet.Protect UserInterfaceOnly:=True arbeitet auch in einem geschützten Arbeitsblatt For Each ws In ActiveWorkbook.Worksheets For Each pt In ws.PivotTables ws.Protect UserInterfaceOnly:=True ActiveSheet zu ws geändert, da ws ...
|
| In das Form Excel wechseln |
|
Excel : Excel Dateien mit Kennwort-Blattschutz ect. finden
Thomas Harmening am 29.11.2011 um 20:33 Uhr (0)
ich nehme mal Nancys Schnippsel aufdefiniere Array mit erlaubten Passwörtern "HUGO", "Benedikt", "Caesar", "Dominik", "NIX" Durchlaufe den OrdnerPrüfe(Unprotect) die Sheets auf erlaubte PW anschliessend setze das PW wieder und stelle Flag auf 1wenn flag = 0 dann war kein PW zutreffend, dann mache Bruteforce auf PW,Anschliessend Setze PW HUGOweiter mit...Code:Sub test() Dim f$, p$, wSheet Dim PWname PWname = Array("HUGO", "Benedikt", "Caesar", "Dominik", "NIX") 5 PW flag = 0 p = "C:xls-testxl" - Pfad ...
|
| In das Form Excel wechseln |
|
Excel : Inhalt einer Zelle als Tabellenname
Thomas Harmening am 13.09.2004 um 15:18 Uhr (0)
Hallo Ralf,Sub TabName() ActiveSheet.Name = Range("B2")End Sublöst dein Problemund umgekehrt:Den Tabellennamen kann man mit folgender Formel anzeigen lassen:=TEIL(ZELLE("dateiname";A1);FINDEN("]";ZELLE("dateiname";A1))+1;255)Voraussetzung: Die Datei muß gespeichert sein.
|
| In das Form Excel wechseln |
|
Excel : Freie stationierung mit Excel oder...
Thomas Harmening am 03.04.2012 um 12:43 Uhr (0)
und?diese Datei hilft nicht?
|
| In das Form Excel wechseln |
|
Excel : Alle Tabellenblätter über Befehlszeile drucken
Thomas Harmening am 18.07.2012 um 20:06 Uhr (0)
hmm, mittels vbs würde ja sowas gehenCode:Dim exDim DateiDim BlattIf WScript.Arguments.Count 0 Then Parameter prüfen Datei = WScript.Arguments(0) Else MsgBox "Es wurde keine Datei angegeben!" bei Fehler, Meldung und beenden WScript.QuitEnd IfSet ex = GetObject(Datei) Verbindung zu ExcelFor Each Blatt In ex.Worksheets alle Arbeitsblätter ausdrucken Blatt.PrintOutNextex.Close XL-Datei schließenund wie hast du es nur über die Endung(Dateierweiterungen?) ...
|
| In das Form Excel wechseln |
|
Excel : Tabelleninhalt komplett unsichtbar
Thomas Harmening am 21.01.2013 um 19:23 Uhr (1)
Zitat:Unter SUB sind jedoch keine Daten zu sehen? Ist da dann auch nichts? Wo sind die 54 MB???1) Kopie erstellt und mit Kopie gearbeitet?2) =WENN(sub!Wertsub!Diff;sub!EA4217;0) m.M. müsste in dem Tabellenblatt sub 2 benannte Zellen mit Namen Wert und Diff existieren. Finde die.Zitat:In Aufträge sowie in SUB sind jeweils über 65000 Zeilen? Also muss ja was drin sein. Hab mal erneut gespeichert und alle Einträge in Register Aufträge gelöscht und es waren dann immer noch 27 MB in der Datei!?3) Wenn du die Fo ...
|
| In das Form Excel wechseln |
|
Excel : Excel 2000 speichert ungewollt TXT ohne
Thomas Harmening am 14.02.2013 um 05:41 Uhr (0)
google liefert bei excel Datei wurde unter kann nicht Sie müssen die datei schliessenhttp://support.microsoft.com/kb/813973/de
|
| In das Form Excel wechseln |
XL2010_select-klick-msgbox.zip |
Excel : Aus markierten Zeilen Werte auslesen!
Thomas Harmening am 22.10.2015 um 18:03 Uhr (1)
Aufgabenstellung:Zitat:1. Ich möchte in einer Excel Datei mehrere Zeilen markieren.2. Über einen Butten Schaltfläche ein Makro starten.3. Über Msgbox Wert auslesen welcher in meinem Fall in Spalte N steht.Code:Sub Summe_x()Summex = 0 For Each cell In Selection If Left(cell.Address, 3) = "$N$" Then Summex = Summex + cell.Value Next MsgBox SummexEnd SubCode einer Schaltfläche zuweisen
|
| In das Form Excel wechseln |
|
Excel : Excel-Datei aus Sprungliste schreibgeschützt öffnen
Thomas Harmening am 25.10.2016 um 11:44 Uhr (1)
Sowas regelt man am besten über Verzeichnis-Rechte Datei-ACLs (Access Control List)Damit legt man fest welche Gruppe(n)- Auflisten- Ausführen- Ändern darf.
|
| In das Form Excel wechseln |
|
Excel : Excel-Datei aus Sprungliste schreibgeschützt öffnen
Thomas Harmening am 25.10.2016 um 13:30 Uhr (1)
Zitat:Original erstellt von runkelruebe:(Schreibschutz, Mappenschutz, Blattschutz, MSGBox, lustiges Lied) hmmm,Disziplin muss gelebt werden und auch verstanden i.d.R. verzicht ich auf die ersten 3, aber 4 und 5 mache ich gerne (BOFH)- man muss dann halt so programmieren, das beim Fremden die das Dokument in die Finger bekommen 4 und 5 nicht zum tragen kommt :-)
|
| In das Form Excel wechseln |
|
Excel : Excel-Datei aus Sprungliste schreibgeschützt öffnen
Thomas Harmening am 25.10.2016 um 18:33 Uhr (1)
Am billigsten - als Vorlage Speichern - ;-)
|
| In das Form Excel wechseln |
|
Excel : Erstelldatum der Datei aus dem Hyperlink
Thomas Harmening am 12.04.2017 um 17:34 Uhr (1)
Code:Sub Test()Dim Pfad As StringPfad = "C:V5_PDFPIT 6881586_2_STUECK_Y980010039320200_2_WELLE_MIT_M10_UND_M6.pdf"MsgBox "Geändert: " & FileDateTime(Pfad)End Sub
|
| In das Form Excel wechseln |
|
Kritik : Dateiendung .png nun als Endung erlaubt
Thomas Harmening am 25.04.2006 um 23:25 Uhr (0)
guten Abend,ja eine Kritik ;-)Mir ist heute aufgefallen, das zu den bislang bekannten Endungen Zitat:Zitat von http://hilfe.cad.de/index.php?option=com_content&task=view&id=25&Itemid=56 Erlaubte Datei-Typen: .gif , .jpg , .zip , .pdf , .txt , .midnun auch .png erlaubt ist ;-) alt und neu Dafür ein !und damit ich nicht dumm sterbe...gibt es hier irgendwo eine Revisionsliste, damit man nachlesen kann was und wie sich das Forum verändert hat ?manches geschieht einfach schleichend und man bekommt nix ...
|
| In das Form Kritik wechseln |
