Thema Datum  Von Nutzer Rating
Antwort
02.09.2015 09:12:52 Bianca
NotSolved
Blau Spalte per Makro kopieren
 02.09.2015 09:52:43 Gast23029
NotSolved
02.10.2015 15:28:02 Bianca
NotSolved

Ansicht des Beitrags:
Von:
Gast23029		 Datum:
02.09.2015 09:52:43		 Views:
634		 Rating:
     
Antwort:
  Ja
Thema:
Spalte per Makro kopieren		 
Sub SpalteMakro()
Dim rngZiel As Range 'Zielbereich
Dim c As Range       'Zähler
'
Set rngZiel = Range("AU5:AU455")
'
For Each c In rngZiel
   'Quelle = 1 Spalte links von
   'Hat Ziel Formel ?
   If c.HasFormula = True Then
      'nix
   Else
      'ist Ziel leer ?
      If Len(c.Value) > 0 Then
         'nix
      Else
         c.Value = c.Offset(, -1).Value
      End If
   End If
Next c
End Sub

 

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
02.09.2015 09:12:52 Bianca
NotSolved
Blau Spalte per Makro kopieren
 02.09.2015 09:52:43 Gast23029
NotSolved
02.10.2015 15:28:02 Bianca
NotSolved