Microsoft Excel – die neusten Beiträge

Verwandte Themen
TomBeerens
06.05.2016, 22:16

Warum stimmen Vorderseite und Rückseite nicht überein bei meiner Arbeitsmappe?

Hallo. Ich arbeite gerade an Eintrittskarten für eine Veranstaltung. Wir vom Verein haben nämlich im Herbst eine Veranstaltung, bei der wir Eintrittskarten verteilen werden. Ich habe sie in Excel 2010 entworfen. Es passen 6 Karten nebeneinander auf ein Blatt (man muss sie dann nur noch zerschneiden). Vorder- und Rückseite sind genau gleich groß. Aber beim Drucken haut es einfach nicht hin. Ich drucke die Vorderseite, dann drehe ich das Blatt um, um die Rückseite zu drucken. Aber da haut das mit den Rändern gar nicht mehr hin. Ich habe dann die Vorderseite kopiert und in Word 2010 eingefügt, danach auf die Seite darunter in der selben Datei die Rückseite. Beide Seiten haben die selben Seitenränder. Aber auch hier klappt es mit dem Druck nicht; vorder- und Rückseite sind nicht gleich, also man würde, wenn man auf der Vorderseite schneidet (zwischen den Karten) die Rückseite nicht treffen und die Karten nicht an der dafür vorgesehenen stelle zerschneiden. Wie kann ich sowas hinbekommen? Auf der Rückseite der Karte stehen bloß rechtliche Sachen wie Umtausch oder Rückgabe ausgeschossen etc. Das würde dann zwar auf dem Kopf stehen, aber das ist egal. Wie bekomme ich es also hin, dass vorder- und Rückseite so gedruckt werden, dass man sie exakt zerschneiden kann, ohne dabei die Rückseite oder so zu zerschneiden?

Computer, Microsoft, Office, Microsoft Excel, Technik, print, Druck, EDV, Veranstaltungstechnik, Werden
1 Antwort
shikser
04.05.2016, 11:16

Wie kann ich bei VBA nach mehreren Kriterien in einer Zeile suchen?

Hallo zusammen.

Ich hab leider nix gescheites zu meiner Problemstellung gefunden, deshalb frage ich jetzt einfach mal direkt nach: Ich möchte in einer großen Tabelle nach mehreren Kriterien in der ersten Zeile suchen. In dieser Zeile sind Überschriften (aus einer .xml übernommen). Leider wiederholen sich die Überschriften ab und an, allerdings mit den unterschiedlichsten Ziffern als Anhängsel (zb AKMKaufteile, AKMKaufteile5, AKMKaufteile324...). Das wäre jetzt aber noch kein Problem, da ich ja normalerweise eh nur nach Teilen des Wortes suche. Ich habe allerdings auch Überschriften die ziemlich ähnlich sind und mit als Treffer gewertet werden so wie ich das mache (zb AKMKaufteileD34, AKMKaufteileB412... also immer entweder das D oder das B mit da drin, und diese Spalten brauche ich nicht).

Zusammengefasst möchte ich einfach nur die erste Zeile nach AKMKaufteile (das ohne D und B) suchen und auch die Zellen/Spalten haben, wo die Ziffern angehängt sind; es handelt sich dabei um Preise, bei D ist das Datum und B der Benutzername angegeben, letztere beiden sind uninteressant). 

For i = 1 To 1000
   If InStr(1, Cells(1, i).Value, "AKMKaufteile") > 0 And InStr(1, Cells(1, i).Value, "AKMKaufteileB*") = 0 And InStr(1, Cells(1, i).Value, "AKMKaufteileD*") = 0 Then
      For j = 1 To 300
         If InStr(1, Cells(j, i).Value, "") > 0 Then
             Cells(j, i).Activate
              ActiveCell.Copy Destination:=Worksheets("Ergebnis").Cells(j, 10).Offset(1)
         End If
      Next j
         
   End If
Next i

(So klappt es leider nicht)

Vielen Dank für jeden Tipp der mich weiterbringt ::)

Gruß

Jan

Microsoft Excel, Filter, Makro, VBA
3 Antworten
NekoIronyOfFate
07.04.2016, 10:18

Wie kann ich in VBA-Excel einen Filter setzen über einer CheckBox?

Hi,

ich suche eine einfachere Lösung für meine UserForm um über CheckBoxen meine Tabelle zu Filtern.

Im grunde möchte ich also, wenn ich einen Wert ankreuze soll dieser Gefiltert werden.

Wie im Beispiel (unten):

FKEP und KKEP angekreuzt = FKEP und KKEP angezeigt.

Nur KKEP angekreuzt = nur KKEP angezeigt

"Wert" der gefiltert werden soll | CheckBox Name
 FKEP                              CBFilterFKEP
 KKEP                              CBFilterKKEP
 KfB                               CBFilterKfB
 ausgesch.                         CBFilterausgesch
 beendet                           CBFilterbeendet
 EQ - KfB                          CBFilterEQKfB
 EQ - FKEP                         CBFilterEQFKEP

Mein momentaner Code schaut wiefolgt aus:

    Private Sub CBFilterFKEP_Click()

If CBFilterFKEP = True Then

    Sheets("Gesamtdaten").Range("$A$2:$EQ$502").AutoFilter Field:=3, Criteria1:=Array( _
    "FKEP"), Operator:=xlFilterValues

If CBFilterKKEP = True Then

    Sheets("Gesamtdaten").Range("$A$2:$EQ$502").AutoFilter Field:=3, Criteria1:=Array( _
    "FKEP", "KKEP"), Operator:=xlFilterValues

End If
End If
End Sub

Private Sub CBFilterKKEP_Click()

    If CBFilterKKEP = True Then

        Sheets("Gesamtdaten").Range("$A$2:$EQ$502").AutoFilter Field:=3, Criteria1:=Array( _
        "KKEP"), Operator:=xlFilterValues

    If CBFilterFKEP = True Then

        Sheets("Gesamtdaten").Range("$A$2:$EQ$502").AutoFilter Field:=3, Criteria1:=Array( _
        "KKEP", "FKEP"), Operator:=xlFilterValues

    End If
    End If
    End Sub

Soweit so gut ... nun habe ich aber nur FKEP und KKEP "abgestimmt" ... muss ich nun alle 5 Werte auch "abstimmen" ? Das wird nämlich ein SEHR langer code ... und ich könnte wetten das es in VBA viel leichter geht ...

Hat wer eine Idee von euch?

MfG Tim

Microsoft Excel, Filter, VBA, Sortieren, Tabelle, checkbox
1 Antwort

Meistgelesene Beiträge zum Thema Microsoft Excel
Mehr meistgelesene Fragen zu Microsoft Excel