Microsoft Excel

Herbers Excel/VBA-Archiv

Ausgabe eines Spalteninhaltes

Betrifft: Ausgabe eines Spalteninhaltes von: hweinig
Geschrieben am: 31.08.2004 14:36:34

Habe folgendes Problem:
Spalte A steht: a,a,b,b,b,c,c,d
ich moechte nun in Spalte b ausgeben: a,b,c,d

wenn moeglich ohne vba, habe keine ahnung davon.
kann mir jemand helfen?

  


Betrifft: AW: Ausgabe eines Spalteninhaltes von: geri
Geschrieben am: 31.08.2004 14:47:19

Hallo

in VBA für jetzt 50 Zeilen

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Row < 51 And Target.Column = 1 Then
    Range("B1:B50").ClearContents
    Range("A1:A50").AdvancedFilter Action:=xlFilterCopy, CopyToRange:=Range("B1"), Unique:=True
    Range("B1:B50").Sort Key1:=Range("B1"), Order1:=xlAscending, Header:=xlGuess, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
    z = Range("B51").End(xlUp).Row
  
End If
End Sub


mit Alt+F11 in editor und kopiere dies in deine Tabelle wo du dies benötigst
ist ganz einfach

gruss geri


  


Betrifft: AW: Ausgabe eines Spalteninhaltes von: christoph
Geschrieben am: 31.08.2004 14:52:41

Hi
Irgendwie ist mir deine Frage ein wenig unverständlich, aber vieleicht hilft dir dies:

Daten Einlesen: (a ist die Variablenbezeichnung)

a = Range("A1") 'Einlesen der Daten aus Zelle A1

Range("B1") = a ' Schreiben der Variablen a in Zelle B1

Gruß christoph


 

Beiträge aus den Excel-Beispielen zum Thema "Ausgabe eines Spalteninhaltes"