Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Sicherheitshinweis ---> für registrierte Mitglieder <-
Die Suche hat 11580 Ergebnisse ergeben.
Seite 420 von 772 Gehe zu Seite Zurück  1, 2, 3, 4, 5, 6, 7 ... 417, 418, 419, 420, 421, 422, 423 ... 766, 767, 768, 769, 770, 771, 772  Weiter
Index
Autor Nachricht
  Thema: Liste separieren 
Phelan XLPH

Antworten: 4
Aufrufe: 335

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Aug 2010, 22:17   Titel: AW: Liste separieren Version: Office 2003
Hallo Steffi alias HelloSteffi. Laughing Laughing Laughing

wahrscheinlich so...

Sub Aufteilen()
Dim arr As Variant
Dim i As Long
Dim Dic As Object
Dim wks As Worksheet
Dim wksNew As Worksheet

Set Dic = CreateObject("Scripting.Dictionary")
Set wks = Tabelle1 'Anpassen


arr = Intersect(wks.Columns(1), wks.UsedRange)

For i = 2 To UBound(arr)
Dic(arr(i, 1)) = 0
Next

arr = Dic.Keys
For i = LBound(arr) To UBound(arr)
wks.UsedRange.AutoFilter 1, arr(i)
wks.AutoFilter.Range.SpecialCells(xlCellTypeVisible).Copy _
Worksheets.Add(, Sheets(Sheets.Count)).Range("A1")
With ActiveSheet
.Name = arr(i) & " single items"
.Cells(Rows.Count, 8).End(xlUp).Offset(1) = _
...
  Thema: Excel-Datei auslesen: nach Index suchen -> Satz neu ausge 
Phelan XLPH

Antworten: 6
Aufrufe: 870

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Aug 2010, 21:40   Titel: AW: Excel-Datei auslesen: nach Index suchen -> Satz neu a Version: Office 2003
Hallo,

hier mal eine Variante mit dem Spezialfilter:
(Informier dich in der ExcelHilfe unter Suche:Filtern mit erweiterten Kriterien
welche Ergebnisse erzielt werden können bei entsprechender Kriterienangabe,
zwingend für gute Filterung)

Beide in einen Ordner kopieren.
  Thema: Importieren von TXT Dateien 
Phelan XLPH

Antworten: 21
Aufrufe: 1180

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Aug 2010, 21:07   Titel: AW: Importieren von TXT Dateien Version: Office 2007
Hallo,

versuchs hiermit:

Sub TxtImport()
Dim Pfad As String

Pfad = "d:\test\TTT.txt" 'Anpassen Pfad & Dateiname

Open Pfad For Input As #1
Call WriteToCLP(Replace(Input(LOF(1), #1), "|", vbTab))
Close #1

With Tabelle3 'Anpassen Zieltabelle
With .Range("A1") 'Anpassen Zielbereich
.Value = 1
.TextToColumns .Cells(1), _
xlDelimited, , True, True
.Parent.Paste .Cells(1)
End With
End With
End Sub

Public Sub WriteToCLP(derText As String)
Dim IE As Object
Set IE = CreateObject("HTMLfile")
IE.ParentWindow.ClipboardData.SetData "text", derText & " "
Set IE = Nothing
End Sub
  Thema: Excel-Datei auslesen: nach Index suchen -> Satz neu ausge 
Phelan XLPH

Antworten: 6
Aufrufe: 870

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Aug 2010, 20:43   Titel: AW: Excel-Datei auslesen: nach Index suchen -> Satz neu a Version: Office 2003
Und wo gibst du die Kundennummer ein? In welcher Mappe?
Besteht die Zielmappe schon?
  Thema: Zeile ans Ende setzen 
Phelan XLPH

Antworten: 8
Aufrufe: 674

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Aug 2010, 20:41   Titel: AW: Zeiele ans Ende setzen Version: Office 2007
Wo soll das hinführen? Was ist die Ausgangssituation? Wie sieht die Tabelle aus? usw.
  Thema: Excel Prozess verschwindet nicht nach Schließen von Excel 
Phelan XLPH

Antworten: 20
Aufrufe: 3036

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Aug 2010, 18:47   Titel: AW: Excel Prozess verschwindet nicht nach Schließen von Exce Version: Office 2003
Eigentlich wird beim schließen der letzten Mappe die Anwendung beendet.
In diesem Fall wohl nicht.

Pack das mal in "DieseArbeitsmappe":
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.Quit
End Sub
  Thema: Siege zählen.... 
Phelan XLPH

Antworten: 3
Aufrufe: 1185

BeitragForum: Excel Formeln   Verfasst am: 30. Aug 2010, 18:27   Titel: AW: Siege zählen.... Version: Office 2007
Hallo,

Tabelle3  ABCD1MannschaftGegner 1312MannschaftGegner 2123MannschaftGegner 3204MannschaftGegner 4225MannschaftGegner 5456MannschaftGegner 6007    8    9Siege:2  10Unentschieden:3  11Niederlagen:1  Formeln der TabelleZelleFormelB9=SUMMENPRODUKT(--(C1:C6>D1:D6))B10=SUMMENPRODUKT(--(C2:C7=D2:D7))B11=SUMMENPRODUKT(--(C3:C8<D3:D8)) [url=http://www.office-loesung.de/ftopic91422_0_0_asc.php]Excel Jeanie Html
  Thema: Daten nach Acces Import - Als Text gespeicherte Zahlen 
Phelan XLPH

Antworten: 2
Aufrufe: 657

BeitragForum: Excel Formate   Verfasst am: 30. Aug 2010, 18:20   Titel: AW: Daten nach Acces Import - Als Text gespeicherte Zahlen Version: Office 2007
Was hast du denn für einen Datentyp der Felder mit Zahlen in Access gewählt?

Nu ja, Verwende die Text-in-Spalten-Methode.
  Thema: Asuwertung einer Preistabelle 
Phelan XLPH

Antworten: 3
Aufrufe: 254

BeitragForum: Excel Formate   Verfasst am: 30. Aug 2010, 18:13   Titel: AW: Asuwertung einer Preistabelle Version: Office 97
Hallo,

Tabelle1  ABCDEF5  01000-0199902000-0299903000-03999usw6  199929993999 70-100kg100554 8101-200kg2001083 9201-400kg40020108 10usw.     11      12Postleitzahl2500    13      14Gewicht250    15      16Betrag10    Formeln der TabelleZelleFormelB16=INDEX($C$7:$E$9;VERGLEICH($B$14;$B$7:$B$9);VERGLEICH($B$12;$C$6:$E$6)) [url=http://www.office-loesung.de/ftopic91422_0_0_asc.php]Excel Jeanie Html
  Thema: Zeilen löschen 
Phelan XLPH

Antworten: 12
Aufrufe: 327

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Aug 2010, 17:22   Titel: AW: Zeilen löschen Version: Office 2007
Wären es Tausende, würdest du mit diesem code eine Warteschleife generieren. Very Happy

Aber bei 250 Zeilen geht das noch!
  Thema: Excel Prozess verschwindet nicht nach Schließen von Excel 
Phelan XLPH

Antworten: 20
Aufrufe: 3036

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Aug 2010, 17:20   Titel: AW: Excel Prozess verschwindet nicht nach Schließen von Exce Version: Office 2003
Und an welche Stelle wird die Mappe geschlossen?

xlAnw.ActiveWorkbook.Close
  Thema: 2dimensionale Arrays kopieren 
Phelan XLPH

Antworten: 5
Aufrufe: 1483

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Aug 2010, 17:17   Titel: AW: 2dimensionale Arrays kopieren Version: Office 2003
UUhhh, wie kompliziert.

Geht sicherlich auch einfacher.

zur FRAGE1: Da bleibt dir nur "Umschaufeln" >> Element für Element in einer
Schleife abarbeiten
  Thema: Zeilen löschen 
Phelan XLPH

Antworten: 12
Aufrufe: 327

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Aug 2010, 17:13   Titel: AW: Zeilen löschen Version: Office 2007
Hallo Robert,

wieviele Zeilen sind es denn?
  Thema: Zeilen löschen 
Phelan XLPH

Antworten: 12
Aufrufe: 327

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Aug 2010, 17:00   Titel: AW: Zeilen löschen Version: Office 2007
Da hab ich wohl falsch interpretiert!

Mensch Eto du hättest sowas doch mit einem Blick in deine Glaskugel
doch ersehen müssen.

Laughing Laughing Laughing Laughing Laughing Laughing Laughing Laughing
Laughing Laughing Rolling Eyes Laughing Laughing Laughing Laughing Laughing
Laughing Laughing Laughing Laughing Laughing Laughing Laughing Laughing
  Thema: Alle Tabellen löschen ausser Reiter Tierhilfe und Pate 
Phelan XLPH

Antworten: 2
Aufrufe: 915

BeitragForum: Excel VBA (Makros)   Verfasst am: 30. Aug 2010, 16:55   Titel: AW: Alle Tabellen löschen ausser Reiter Tierhilfe und Pate Version: Office 2003
hALLO;

Sub LoeschDiesUndJenesAusserTierhilfeUndPate()
Dim wks As Worksheet
Application.DisplayAlerts = False
For Each wks In ThisWorkbook.Worksheets
Select Case wks.Name
Case "Tierhilfe", "Pate"
Case Else: wks.Delete
End Select
Next
Application.DisplayAlerts = True
End Sub
 
Seite 420 von 772 Gehe zu Seite Zurück  1, 2, 3, 4, 5, 6, 7 ... 417, 418, 419, 420, 421, 422, 423 ... 766, 767, 768, 769, 770, 771, 772  Weiter
Gehe zu:  
Alle Zeiten sind
GMT + 1 Stunde

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