Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Die Suche hat 11580 Ergebnisse ergeben.
Seite 463 von 772 Gehe zu Seite Zurück  1, 2, 3, 4, 5, 6, 7 ... 460, 461, 462, 463, 464, 465, 466 ... 766, 767, 768, 769, 770, 771, 772  Weiter
Index
Autor Nachricht
  Thema: NOTFALL! Problem beim Filter in Excel! HilfE!!! 
Phelan XLPH

Antworten: 10
Aufrufe: 308

BeitragForum: Excel VBA (Makros)   Verfasst am: 01. Jul 2010, 18:59   Titel: AW: NOTFALL! Problem beim Filter in Excel! HilfE!!! Version: Office 2003
kannst du ne Bsp-Datei hochladen?
  Thema: AutoFill mit xldown 
Phelan XLPH

Antworten: 6
Aufrufe: 1231

BeitragForum: Excel VBA (Makros)   Verfasst am: 01. Jul 2010, 18:45   Titel: AW: AutoFill mit xldown Version: Office 2003
Cells(1, 1).AutoFill Destination:=Range(Cells(1, 1),Cells(1, 1).End(xlDown))
  Thema: Zellenwert in aktive Zelle kopieren 
Phelan XLPH

Antworten: 2
Aufrufe: 2522

BeitragForum: Excel VBA (Makros)   Verfasst am: 01. Jul 2010, 18:41   Titel: AW: Zellenwert in aktive Zelle kopieren Version: Office 2007
Kopieren:
Range("G30").Copy ActiveCell
Wert zuweisen:
ActiveCell.Value = Range("G30").Value
  Thema: NOTFALL! Problem beim Filter in Excel! HilfE!!! 
Phelan XLPH

Antworten: 10
Aufrufe: 308

BeitragForum: Excel VBA (Makros)   Verfasst am: 01. Jul 2010, 18:38   Titel: AW: NOTFALL! Problem beim Filter in Excel! HilfE!!! Version: Office 2003
Überschriften müssen sowohl im Datenblock wie auch im KriterienBlock
vorhanden sein, dann funktionierts auch:

grün=KritBereich
gelb=DatenBereich

Tabelle1  ABC1abc2 x13abc41x152y263z174x285x196x5107z6118y1 [url=http://www.office-loesung.de/ftopic91422_0_0_asc.php]Excel Jeanie Html
  Thema: NOTFALL! Problem beim Filter in Excel! HilfE!!! 
Phelan XLPH

Antworten: 10
Aufrufe: 308

BeitragForum: Excel VBA (Makros)   Verfasst am: 01. Jul 2010, 18:09   Titel: AW: NOTFALL! Problem beim Filter in Excel! HilfE!!! Version: Office 2003
Du stoßt den Filter 2ml an!

Teste das mal:

Sub Spezialfilter2()
Application.ScreenUpdating = False
LZeile = GetLastRow(Range("B:DV"))
If LZeile < 19 Then LZeile = 19
Range("C18:DV" & LZeile).AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _
Range("C11:C16"), Unique:=False
End Sub
  Thema: endlosschleife 
Phelan XLPH

Antworten: 7
Aufrufe: 439

BeitragForum: Excel VBA (Makros)   Verfasst am: 01. Jul 2010, 18:02   Titel: AW: endlosschleife Version: Office 2003
Hallo,

Du hast bei deinem Code einen Logik-Fehler. Du prüfst, ob Range("A2") leer
ist. Sobald er einmal in der schleife ist und Range("A2") nicht umgeschrieben
wird, läft die Schleife endlos (das ist die Gefahr bei Do...Loop schleifen).

Um die Daten nach folgendem Code zu kopieren ist das ein- und ausblenden
der Blätter nicht nötig.

Sub ph_SuchenKopieren()
'Variabel definieren
Dim KST As Integer
Dim wks As Worksheet
Dim rngFQ As Range
Dim rngFZ As Range

If Not IsEmpty(Worksheets("Basisblatt").Range("K2").Value) Then _
KST = Range("K2").Value Else Exit Sub

For Each wks In ThisWorkbook.Worksheets
If wks.Name <> "Basisblatt" Then
Set rngFZ = Worksheets("Basisblatt").Range("B:B").Find(KST, , xlValues, xlWhole)
If Not rngFZ Is Nothing Then
Set rngFQ = wks.Range("K:K& ...
  Thema: Multibox mit Comboboxen in Abhängigkeit 
Phelan XLPH

Antworten: 23
Aufrufe: 1701

BeitragForum: Excel VBA (Makros)   Verfasst am: 01. Jul 2010, 17:21   Titel: AW: Multibox mit Comboboxen in Abhängigkeit Version: Office 2003
Hallo,

ich denk ich habs verstanden.
  Thema: Multibox mit Comboboxen in Abhängigkeit 
Phelan XLPH

Antworten: 23
Aufrufe: 1701

BeitragForum: Excel VBA (Makros)   Verfasst am: 01. Jul 2010, 09:12   Titel: AW: Multibox mit Comboboxen in Abhängigkeit Version: Office 2003
Ich denke jedoch das kriegst du problemlos hin...

...vielleicht, wenn ich es verstehen würde.
  Thema: Bild in Zelle skalieren 
Phelan XLPH

Antworten: 2
Aufrufe: 1265

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Jun 2010, 20:48   Titel: AW: Bild in Zelle skalieren Version: Office 2003
Hallo,

hier mal ein Ansatz:

Sub ph()
With Tabelle1.Shapes(1)
.Left = .TopLeftCell.Left
.Top = .TopLeftCell.Top
.Height = .TopLeftCell.Height
.Width = .TopLeftCell.Width
End With
End Sub
  Thema: hardware seriennummer von usb stick auslesen 
Phelan XLPH

Antworten: 15
Aufrufe: 5381

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Jun 2010, 20:40   Titel: AW: hardware seriennummer von usb stick auslesen Version: Office 2007
Lauft den Code mal mit F8 durch und schaut wo er in die Fehlerauswertung
springt.
  Thema: Nach Datum suchen (01.01.1900) 
Phelan XLPH

Antworten: 3
Aufrufe: 1714

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Jun 2010, 18:52   Titel: AW: Nach Datum suchen (01.01.1900) Version: Office 2003
Denn das Jahr 1900 ist kein Schaltjahr.

zeigt folgende Funktion:

von Schmitts Page
Function Schaltjahr(Jahreszahl)
If (Jahreszahl Mod 4) = 0 And (Jahreszahl Mod 100) <> 0 Or _
((Jahreszahl Mod 400) = 0) Then
Schaltjahr = True
Else
Schaltjahr = False
End If
End Function

1900/4=475;Rest=0 ->Wahr
1900/100=19; Rest<>0 ->Falsch
1900/400=4,75; Rest=0 ->Falsch

Wahr AND (Falsch OR Falsch) -> Falsch
  Thema: hardware seriennummer von usb stick auslesen 
Phelan XLPH

Antworten: 15
Aufrufe: 5381

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Jun 2010, 18:36   Titel: AW: hardware seriennummer von usb stick auslesen Version: Office 2007
Hallo,

Bei EarlyBinding muss ein Verweis gesetzt werden.

Da machen doch nen LateBinding draus, dann geht das ohne Verweissetzung:

ersetze:
Dim objFSO As Scripting.FileSystemObject
Dim objLaufwerk As Scripting.Drive
Dim strLaufwerk As String
Dim lngZahl As Long
durch das:
Dim objFSO, objLaufwerk
Dim strLaufwerk As String
Dim lngZahl As Long
Set objFSO = CreateObject("Scripting.FileSystemObject")
  Thema: Nach Datum suchen (01.01.1900) 
Phelan XLPH

Antworten: 3
Aufrufe: 1714

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Jun 2010, 18:27   Titel: AW: Nach Datum suchen (01.01.1900) Version: Office 2003
Hallo,

das hab ich auch schon festgestellt:
Du suchst nach dem 01.01.1900 und er findet den 02.01.1900,
d.h. eine Tag weiter.

Nach dem 29.02.1900 findet es wieder die Daten die es finden soll.

Liegt wohl an dem Schaltjahr, genau wissen tu ichs nicht, nur ne Vermutung.
  Thema: Multibox mit Comboboxen in Abhängigkeit 
Phelan XLPH

Antworten: 23
Aufrufe: 1701

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Jun 2010, 17:18   Titel: AW: Multibox mit Comboboxen in Abhängigkeit Version: Office 2003
Vba soll den Ort erkennen an dem die Datei geöffnet wird?
  Thema: Multibox mit Comboboxen in Abhängigkeit 
Phelan XLPH

Antworten: 23
Aufrufe: 1701

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Jun 2010, 16:08   Titel: AW: Multibox mit Comboboxen in Abhängigkeit Version: Office 2003
Sorry, wieder mal ein typischer Fehler von mir.

Du musst einen Wert in der Listbox wählen erst dann kann gedruckt werden.

Tausch mal den Code-Teil durch diesen:
Private Sub CommandButton1_Click()
With Tabelle3
Select Case MultiPage1.SelectedItem.Index
Case 0:
If ListBox1.ListIndex > -1 Then
.Cells(1, 1) = Label4.Caption & ":"
.Cells(3, 1) = Label5.Caption & ":"
.Cells(5, 1) = Label6.Caption & ":"
.Cells(1, 2) = ListBox1.List(ListBox1.ListIndex)
.Cells(3, 2) = ListBox2.List(ListBox2.ListIndex)
.Cells(5, 2) = ListBox3.List(ListBox3.ListIndex)
Else
MsgBox "Bitte einen Eintrag wählen!", , "Info"
Exi ...
 
Seite 463 von 772 Gehe zu Seite Zurück  1, 2, 3, 4, 5, 6, 7 ... 460, 461, 462, 463, 464, 465, 466 ... 766, 767, 768, 769, 770, 771, 772  Weiter
Gehe zu:  
Alle Zeiten sind
GMT + 1 Stunde

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Dreamweaver Forum