Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Die Suche hat 11580 Ergebnisse ergeben.
Seite 6 von 772 Gehe zu Seite Zurück  1, 2, 3, 4, 5, 6, 7, 8, 9 ... 766, 767, 768, 769, 770, 771, 772  Weiter
Index
Autor Nachricht
  Thema: Dynamische Summe in einer Textbox ausgeben 
Phelan XLPH

Antworten: 3
Aufrufe: 53

BeitragForum: Excel VBA (Makros)   Verfasst am: 06. Feb 2014, 13:26   Titel: AW: Dynamische Summe in einer Textbox ausgeben Version: Office 2010
Hallo Simi,

hier ein Beispiel, ich hoffe du kommst damit klar.
  Thema: Lösch Befehl schneller und Einfacher 
Phelan XLPH

Antworten: 9
Aufrufe: 144

BeitragForum: Excel VBA (Makros)   Verfasst am: 06. Feb 2014, 12:44   Titel: AW: Lösch Befehl schneller und Einfacher Version: Office 2013
Hallo,

dass dürfte nochmal was bringen...

Private Sub Inhalte_speicher_fuer_Weiterverarbeitung()

Dim wbKopie As Workbook
Dim wsKopie As Worksheet
Dim wsBasis As Worksheet

Dim myZeile As Byte
Dim myFreieZeile As Long
Dim varTabellenKopf As Variant


' Zusammensetzung des Dateinamens
NameTeil1 = ThisWorkbook.Sheets("Faktura").Range("T20") ' Jahr
NameTeil2 = ThisWorkbook.Sheets("Faktura").Range("Y20") ' Nummer
NameTeil3 = ThisWorkbook.Sheets("Faktura").Range("Z13") ' Nachname
NameTeil4 = ThisWorkbook.Sheets("Faktura").Range("V13") ' Vorname
NameTeil5 = ThisWorkbook.Sheets("Faktura").Range("A20") ' Angebot
NameTeil6 = ThisWorkbook.Sheets("Faktura").Range("D23") ' Datum
' Speicherort
pfad = Thi ...
  Thema: Daten per SVerweis oder Index/Match aus externer Datei 
Phelan XLPH

Antworten: 7
Aufrufe: 102

BeitragForum: Excel VBA (Makros)   Verfasst am: 06. Feb 2014, 10:36   Titel: AW: Daten per SVerweis oder Index/Match aus externer Datei Version: Office 2010
Wie kriege ich es nun aber hin, dass ich eine Varible für die Zeile und eine Varibale für das Tabellenblatt vergeben kann

Warum Zeile, die wird doch ermittelt über die Match()-Funktion?
  Thema: CSV Import in ein einzige Zeile 
Phelan XLPH

Antworten: 22
Aufrufe: 278

BeitragForum: Excel VBA (Makros)   Verfasst am: 06. Feb 2014, 09:55   Titel: AW: CSV Import in ein einzige Zeile Version: Office 2010
ajajaj....

ersetze das
astrTextzeile = Split(strTextzeile, ";")
durch das
astrTextzeile = Split(Replace(strTextzeile,"""",""), ";")
  Thema: CSV Import in ein einzige Zeile 
Phelan XLPH

Antworten: 22
Aufrufe: 278

BeitragForum: Excel VBA (Makros)   Verfasst am: 06. Feb 2014, 00:33   Titel: AW: CSV Import in ein einzige Zeile Version: Office 2010
Das müsste passen:

Sub x()
Dim astrDaten() As String

astrDaten = ReadFile("C:\...\Test.txt")

Cells(1).Value = astrDaten(0)
Cells(2).Value = astrDaten(1)
Cells(3).Value = astrDaten(2)
With Cells(4)
.Value = .Value & IIf(Len(.Value) > 0, vbLf, "") & astrDaten(3)
End With

End Sub

Public Function ReadFile(ByVal strFileName As String) As String()
Dim intHandle As Integer
Dim strTextzeile As String
Dim astrTextzeile() As String
Dim astrText(3) As String
Dim lngZeile As Long

intHandle = FreeFile
Open strFileName For Input As #intHandle
Do While Not EOF(intHandle)
Line Input #intHandle, strTextzeile
lngZeile = lngZeile + 1
astrTextzeile = Split(strTextzeile, ";")
If lngZ ...
  Thema: Wie generiere ich einen Warte Befehl 
Phelan XLPH

Antworten: 12
Aufrufe: 121

BeitragForum: Excel VBA (Makros)   Verfasst am: 05. Feb 2014, 23:50   Titel: AW: Wie generiere ich einen Warte Befehl Version: Office 2010
Wie sieht dein Code aus?
  Thema: 13 Dropdown-Listen miteinander verknüpfen 
Phelan XLPH

Antworten: 1
Aufrufe: 67

BeitragForum: Excel VBA (Makros)   Verfasst am: 05. Feb 2014, 21:15   Titel: AW: 13 Dropdown-Listen miteinander verknüpfen Version: Office 2010
Korrektur
  Thema: Globale Variablen vs Unload UserForm 
Phelan XLPH

Antworten: 11
Aufrufe: 129

BeitragForum: Excel VBA (Makros)   Verfasst am: 05. Feb 2014, 21:01   Titel: AW: Globale Variablen vs Unload UserForm Version: Office 2010
Ich schau mal sollte dieses Phänomen wieder auftreten, dann melde ich mich wieder.
  Thema: Globale Variablen vs Unload UserForm 
Phelan XLPH

Antworten: 11
Aufrufe: 129

BeitragForum: Excel VBA (Makros)   Verfasst am: 05. Feb 2014, 16:38   Titel: AW: Globale Variablen vs Unload UserForm Version: Office 2010
Hallo Heinz,

das ist mir klar.
  Thema: Mit VBA nach Farbe selektieren 
Phelan XLPH

Antworten: 9
Aufrufe: 99

BeitragForum: Excel VBA (Makros)   Verfasst am: 05. Feb 2014, 15:20   Titel: AW: Mit VBA nach Farbe selektieren Version: Office 2010
Das Makro durchsucht alle Daten*.xls?-Dateien in dem angegebenen Pfad,
öffnet diese, filtert, färbt das Filterergebnis rot und kopiert es in das aktive
Arbeitsblatt in die erste leere Zelle (von unten) in spalte A.
  Thema: Makro für Export in Textdatei 
Phelan XLPH

Antworten: 5
Aufrufe: 67

BeitragForum: Excel VBA (Makros)   Verfasst am: 05. Feb 2014, 15:15   Titel: AW: Makro für Export in Textdatei Version: Office 2010
Hallo,

hier eine weitere Möglichkeit (ohne Pfadwahl):

Sub DatensaetzeSchreiben()

Dim Pfad As String
Dim DatenText As String
Dim DatenTextTmp As String
Dim FF As Integer

Const Trennzeichen As String = "|"

Pfad = ThisWorkbook.Path & "\Text-Export.txt"

With ThisWorkbook
DatenText = DatenText & VektorToTextzeile(.Worksheets("Settings").Range("A7:T7"), True, Trennzeichen) & Trennzeichen & vbNewLine
DatenText = DatenText & VektorToTextzeile(.Worksheets("Daten").Range("B4:B46"), False, Trennzeichen) & Trennzeichen & vbNewLine
DatenText = DatenText & VektorToTextzeile(.Worksheets("Daten").Range("B51:B226"), False, Trennzeichen) & Trennzeichen & vbNewLine
End With

FF = Fr ...
  Thema: Makro für Export in Textdatei 
Phelan XLPH

Antworten: 5
Aufrufe: 67

BeitragForum: Excel VBA (Makros)   Verfasst am: 05. Feb 2014, 14:38   Titel: AW: Makro für Export in Textdatei Version: Office 2010
Hallo,

Genau so angeordnet, wie die Daten, welche in Zeile 2 fliessen sollen.

Was heißt das? Meinst und nicht Zeile 3, einfach anhängen unterhalb von Zeile 2?
  Thema: Mit VBA nach Farbe selektieren 
Phelan XLPH

Antworten: 9
Aufrufe: 99

BeitragForum: Excel VBA (Makros)   Verfasst am: 05. Feb 2014, 14:22   Titel: AW: Mit VBA nach Farbe selektieren Version: Office 2010
Unterscheiden sich die IDs zwischen den Dateien, falls nicht, dann weißt du nicht
welcher Datensatz zu welcher Datei gehört?

Nu ja, hier ein Beispiel ...

Gefiltert wird Spalte A nach Schwarzschrift und Spalte B nach Nichtleer.

Sub Import()

Dim Pfad As String
Dim Datei As String
Dim ZielBlattLetzteZelle As Range
Dim FilterBereich As Range

Application.ScreenUpdating = False

With ActiveSheet ' ZielBlatt ggf. anpassen
Set ZielBlattLetzteZelle = .Cells(.Rows.Count, 1)
End With

'Pfad = ThisWorkbook.Path ' ggf. anpassen
Pfad = "C:\Daten\"

If Right(Pfad, 1) <> "\" Then Pfad = Pfad & "\"

Datei = Dir(Pfad & "Daten*.xls?", vbNormal)

Do Until Datei = vbNullString

With Workbooks.Open(Pfad & Datei)

With .Worksheets("Tabelle1"&# ...
  Thema: Suchbegriff in mehreren (geschlossenen) excel-Mappen finden 
Phelan XLPH

Antworten: 20
Aufrufe: 261

BeitragForum: Excel VBA (Makros)   Verfasst am: 05. Feb 2014, 13:32   Titel: AW: Suchbegriff in mehreren (geschlossenen) excel-Mappen fin Version: Office 2003
"*" >> Platzhalter
  Thema: Mit VBA nach Farbe selektieren 
Phelan XLPH

Antworten: 9
Aufrufe: 99

BeitragForum: Excel VBA (Makros)   Verfasst am: 05. Feb 2014, 13:22   Titel: AW: Mit VBA nach Farbe selektieren Version: Office 2010
Wenn Spalte A leer ist, ist dann Spalte B auch leer?
 
Seite 6 von 772 Gehe zu Seite Zurück  1, 2, 3, 4, 5, 6, 7, 8, 9 ... 766, 767, 768, 769, 770, 771, 772  Weiter
Gehe zu:  
Alle Zeiten sind
GMT + 1 Stunde

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