Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Die Suche hat 2194 Ergebnisse ergeben.
Seite 99 von 147 Gehe zu Seite Zurück  1, 2, 3, 4, 5, 6, 7 ... 96, 97, 98, 99, 100, 101, 102 ... 141, 142, 143, 144, 145, 146, 147  Weiter
Index
Autor Nachricht
  Thema: datei schließen wenn computer nicht verbunden mit netzwerk 
werni

Antworten: 6
Aufrufe: 356

BeitragForum: Excel VBA (Makros)   Verfasst am: 15. März 2011, 18:30   Titel: AW: datei schließen wenn computer nicht verbunden mit netzwe Version: Office 2007
Hallo Christoph

Erstelle ein leeres Blatt in deiner Arbeitsmappe

Dieser Code gehört ans selbe Ort wie Private Sub Workbook_Open()
Tabellen1 etc. noch anpassen.

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Tabelle1.Visible = xlVeryHidden
Tabelle3.Visible = xlVeryHidden
Tabelle4.Visible = xlVeryHidden
End Sub

Musst natürlich bei Workbook Open diese wieder auf True stellen.

Private Sub Workbook_Open()
On Error GoTo AUSAMEN
ChDrive ("T:\")
Tabelle1.Visible = True
Tabelle3.Visible = True
Tabelle4.Visible = True
Exit Sub
AUSAMEN:
ActiveWorkbook.Close
End Sub

Alle auf xlVeryHidden setzen bis auf das leere Blatt.

So ist, wenn die Makros nicht aktiviert sind nur das leere Blatt sichtbar. Und die ander konnen auch vom Menü her nicht Sichtbar gemacht werden.

Gruss werni
  Thema: datei schließen wenn computer nicht verbunden mit netzwerk 
werni

Antworten: 6
Aufrufe: 356

BeitragForum: Excel VBA (Makros)   Verfasst am: 15. März 2011, 17:55   Titel: AW: datei schließen wenn computer nicht verbunden mit netzwe Version: Office 2007
Hallo Christoph

Hast du denn diesen Code nicht ins klassische Modul DieseArbeitsmappe gelegt?

Private Sub Workbook_Open() gehört dorthin.

Natürlich funktioniert das nur bei aktivierten Makros. Ich nehme an, dass das bei Office 2007 immer noch so ist.

Gruss werni
  Thema: datei schließen wenn computer nicht verbunden mit netzwerk 
werni

Antworten: 6
Aufrufe: 356

BeitragForum: Excel VBA (Makros)   Verfasst am: 15. März 2011, 17:01   Titel: AW: datei schließen wenn computer nicht verbunden mit netzwe Version: Office 2007
Hallo Christoph

Versuch mal diese Code. Laufwerksbuchstaben musst noch anpassen.


Private Sub Workbook_Open()
On Error GoTo AUSAMEN
ChDrive ("T:\")
Exit Sub
AUSAMEN:
ActiveWorkbook.Close
End Sub

Gruss werni
  Thema: Linie mit VBA 
werni

Antworten: 8
Aufrufe: 4571

BeitragForum: Excel VBA (Makros)   Verfasst am: 15. März 2011, 16:28   Titel: AW: Linie mit VBA Version: Office 2007
Hallo DarkestSun

Ich hab mal was gebastelt. Was du beachten und ev. ändern musst sind die Punte pro Spaltenbreite/Zeilenhöhe.

Gruss werni
  Thema: Tabellenblatt: Kopie erstellen mit Schreibschutz 
werni

Antworten: 2
Aufrufe: 866

BeitragForum: Excel VBA (Makros)   Verfasst am: 15. März 2011, 12:09   Titel: AW: Tabellenblatt: Kopie erstellen mit Schreibschutz Version: Office 2003
Hallo Steffi

Meinst du so?

ThisWorkbook.Worksheets("Name zu kopierendes Tabellenblatt").Copy
ActiveWorkbook.SaveAs (Pfad & "Name neue Datei"), FileFormat _
:=xlNormal, Password:="", WriteResPassword:="werni", ReadOnlyRecommended _
:=False, CreateBackup:=False
ActiveWorkbook.Close

Gruss werni
  Thema: Tastatur mit Butons erstellen ...wer kann helfen 
werni

Antworten: 5
Aufrufe: 717

BeitragForum: Excel VBA (Makros)   Verfasst am: 15. März 2011, 09:39   Titel: AW: Tastatur mit Butons erstellen ...wer kann helfen Version: Office 2007
Hallo Engelbert

Das ist ein Ausschnitt einer Stempeluhr. Hier geben die User ihren Code ein.
Diese Stempeluhr eignet sich besonders für Touchscreen-Bildschirme, ohne Tastatur und Maus.

Gruss werni
  Thema: Nach Datum Suchen und alles was älter als 31Tage ist löschen 
werni

Antworten: 2
Aufrufe: 605

BeitragForum: Excel VBA (Makros)   Verfasst am: 15. März 2011, 09:23   Titel: AW: Nach Datum Suchen und alles was älter als 31Tage ist lös Version: Office 2003
Hallo Sebastian

mit diesem Code:

Sub Aelter31()
Application.ScreenUpdating = False
For i = Selection.SpecialCells(xlCellTypeLastCell).Row To 2 Step -1
If Cells(i, 2) <= Date - 31 Then Cells(i, 2).EntireRow.Delete
Next i
Application.ScreenUpdating = True
End Sub

Gruss werni
  Thema: Tastatur mit Butons erstellen ...wer kann helfen 
werni

Antworten: 5
Aufrufe: 717

BeitragForum: Excel VBA (Makros)   Verfasst am: 15. März 2011, 08:52   Titel: AW: Tastatur mit Butons erstellen ...wer kann helfen Version: Office 2007
Hallo Engelbert

Das kannst du mit einer Userform machen. Aber einfacher geht es über die von Windows mitgelieferten "Bildschirmtastatur".

Gruss werni
  Thema: per Makro Druckvorschau A3 bzw 2mal A4 
werni

Antworten: 6
Aufrufe: 666

BeitragForum: Excel VBA (Makros)   Verfasst am: 14. März 2011, 12:56   Titel: AW: per Makro Druckvorschau A3 bzw 2mal A4 Version: Office 2003
Hallo Luk

Versuch mal:

Sub Vorschau()
With ActiveSheet.PageSetup
.Orientation = xlLandscape
.Zoom = False
.FitToPagesWide = 1
.FitToPagesTall = 1
End With
ActiveWindow.SelectedSheets.PrintPreview
End Sub

Gruss werni
  Thema: Datumsformat TTTT, TT. MMMM JJJJ hh:mm:ss 
werni

Antworten: 27
Aufrufe: 3760

BeitragForum: Excel Formeln   Verfasst am: 14. März 2011, 09:58   Titel: AW: Datumsformat TTTT, TT. MMMM JJJJ hh:mm:ss Version: Office 2003
Hallo Knudi

Arbeitsblatt mit dem Namen 'Data' B1Dienstag 01.03.2011 13:53:24.827ZelleFormatWertB1TTTT* TT.MM.JJJJ hh:mm:ss.00001.03.2011 13:53:25ZelleFormelB1=WECHSELN(WECHSELN(A1;LINKS(A1;SUCHEN(",";A1)+1);"");":";".";3)+(REST(RECHTS(A1;3)/86400000;1))Diese Tabelle wurde mit Tab2Html (v2.4.1) erstellt. ©Gerd alias Bamberg

Gruss werni
  Thema: Datumsformat TTTT, TT. MMMM JJJJ hh:mm:ss 
werni

Antworten: 27
Aufrufe: 3760

BeitragForum: Excel Formeln   Verfasst am: 14. März 2011, 09:43   Titel: AW: Datumsformat TTTT, TT. MMMM JJJJ hh:mm:ss Version: Office 2003
Hallo knudi

Dann ersetze das Komma durch einen Punkt.

WECHSELN(WECHSELN(WECHSELN(A1;LINKS(A1;SUCHEN(",";A1)+1);"");":";",";3);" ";"";1)*1

Gruss werni
  Thema: Datumsformat TTTT, TT. MMMM JJJJ hh:mm:ss 
werni

Antworten: 27
Aufrufe: 3760

BeitragForum: Excel Formeln   Verfasst am: 14. März 2011, 09:33   Titel: AW: Datumsformat TTTT, TT. MMMM JJJJ hh:mm:ss Version: Office 2003
Hallo knudi

Frage: Was hast du für eine Ländereinstellung?

Gruss werni
  Thema: Seitenansicht ist deaktiviert 
werni

Antworten: 2
Aufrufe: 1178

BeitragForum: Excel Hilfe   Verfasst am: 13. März 2011, 13:46   Titel: AW: Seitenansicht ist deaktiviert Version: Office XP (2002)
Hallo Franz

Kopiere diesen Code in ein normales Modul und starte ihn.

Option Explicit

Public Druck As Boolean
Sub DRUCKEN()
Druck = True
End Sub

Gruss werni
  Thema: Kalender mehrzeilige Termine drucken 
werni

Antworten: 1
Aufrufe: 1380

BeitragForum: Outlook Kalender   Verfasst am: 12. März 2011, 05:26   Titel: AW: Kalender mehrzeilige Termine drucken Version: Office 2003
Hallo Gerhard

Die grösse der Tagesfelder ist gegeben, da kannst du nicht ein 600-seitiges Buch schreiben.

Aber versuche mal in der Seitenansicht den Schriftgrad auf 5 oder 6 einzustellen, oder drucke den Kalender auf Format A3.

Gruss werni
  Thema: Hintergrundtext automatisch ein- und ausblenden 
werni

Antworten: 7
Aufrufe: 871

BeitragForum: Excel VBA (Makros)   Verfasst am: 11. März 2011, 15:46   Titel: AW: Hintergrundtext automatisch ein- und ausblenden Version: Office 2003
Hallo Martin

Was willst du? Dass die User zuerst dden Inhalt der Textbox löschen, oder dass sie direkt einschreiben können?

Mit einem Label über der Textbox kannst du die Bezeichnung dazugeben.

Da ich heute etwas kurzsichtig bin, kann ich leider nicht auf deinen PC sehen. Razz

Gruss werni
 
Seite 99 von 147 Gehe zu Seite Zurück  1, 2, 3, 4, 5, 6, 7 ... 96, 97, 98, 99, 100, 101, 102 ... 141, 142, 143, 144, 145, 146, 147  Weiter
Gehe zu:  
Alle Zeiten sind
GMT + 1 Stunde

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Microsoft-Excel Diagramme