Thema Datum  Von Nutzer Rating
Antwort
23.04.2014 15:50:08 Santiago
Solved
23.04.2014 16:46:14 Gast26779
NotSolved
23.04.2014 21:50:00 Santiago
NotSolved
23.04.2014 17:54:13 Gast66204
NotSolved
23.04.2014 21:52:31 Santiago
NotSolved
23.04.2014 22:44:36 Gast37806
NotSolved
24.04.2014 09:33:25 Santiago
NotSolved
Blau - egal Hauptsach es läuft :D
24.04.2014 10:19:05 Gast31661
NotSolved
24.04.2014 11:10:13 Gast82566
NotSolved
24.04.2014 14:35:07 Gast6535
NotSolved
25.04.2014 11:27:04 Santiago
NotSolved

Ansicht des Beitrags:
Von:
Gast31661
Datum:
24.04.2014 10:19:05
Views:
1554
Rating: Antwort:
  Ja
Thema:
- egal Hauptsach es läuft :D

Worksheets(i).Range("=A1").Select
If Selection.Value <> "" Then
  Worksheets(i).Range("A1").End(xlDown).Select
  Selection.Offset(1).Select
End If
 
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=True
'das Offset(0, 1)in der nächsten Zeile die 1 ist die erste Spalte rechts vom,
'die 2 wäre die 2. Spalte rechts usw.
Selection.Cells(1).Offset(0, 1).Value = wkbInput.FullName & " " & wksInput.Name

 
i = i + 1
Loop


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
23.04.2014 15:50:08 Santiago
Solved
23.04.2014 16:46:14 Gast26779
NotSolved
23.04.2014 21:50:00 Santiago
NotSolved
23.04.2014 17:54:13 Gast66204
NotSolved
23.04.2014 21:52:31 Santiago
NotSolved
23.04.2014 22:44:36 Gast37806
NotSolved
24.04.2014 09:33:25 Santiago
NotSolved
Blau - egal Hauptsach es läuft :D
24.04.2014 10:19:05 Gast31661
NotSolved
24.04.2014 11:10:13 Gast82566
NotSolved
24.04.2014 14:35:07 Gast6535
NotSolved
25.04.2014 11:27:04 Santiago
NotSolved