WCM - Das österreichische Computer Magazin Forenübersicht
 

Zurück   WCM Forum > Rat & Tat > Software

Software Rat & Tat bei Softwareproblemen

Microsoft KARRIERECAMPUS

 
 
Themen-Optionen Ansicht
Alt 21.04.2006, 23:04   #4
chrisne
Gesperrt
 
Registriert seit: 23.08.2000
Beiträge: 3.692


Standard

also ich bin mir auch nicht so ganz sicher ob ich deine frage richtig verstanden habe. aber vergiss die ganzen sachen mit "Bezug". das bekommst leichter mit vba hin.

ich habe dir hier einmal eine kleine testcode gemacht:

Zitat:
Option Explicit

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Dim W1, W2 As Worksheet
Dim rngBereich As Range

On Error GoTo Ende

Set W1 = Worksheets("Tabelle1")
Set W2 = Worksheets("Tabelle2")

Set rngBereich = Worksheets("Tabelle2").Range("A1:A1")

If Not Intersect(Target, rngBereich) Is Nothing Then
If WorksheetFunction.CountIf(W1.Range("$A:$A"), Target.Value) = 0 Then
W1.Range("A" & W1.Range("A65536").End(xlUp).Row + 1).Value = Target.Value
End If
End If


Ende:
Set rngBereich = Nothing
End Sub

mache folgendes:
neue excel datei
unten beim register wo tabelle2 steht drückst du die rechte mausstaste und sagst "code anzeigen". dann nimmst mein testcode und fügst diesen ein.

und schon kannst du es testen:
wenn du in tabelle2 im feld A1 einen wert eingibst bzw änderst, dann wird dieser in tabelle1 in spalte A geschrieben. neue werte werden immer unten in tabelle1 angehängt: a1,a2,a3,....

ich hoffe, dass dir das ein wenig hilft oder habe ich dein problem falsch verstanden?
chrisne ist offline   Mit Zitat antworten
 


Aktive Benutzer in diesem Thema: 1 (Registrierte Benutzer: 0, Gäste: 1)
 

Forumregeln
Es ist Ihnen nicht erlaubt, neue Themen zu verfassen.
Es ist Ihnen nicht erlaubt, auf Beiträge zu antworten.
Es ist Ihnen nicht erlaubt, Anhänge hochzuladen.
Es ist Ihnen nicht erlaubt, Ihre Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.

Gehe zu


Alle Zeitangaben in WEZ +2. Es ist jetzt 23:45 Uhr.


Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Forum SEO by Zoints
© 2009 FSL Verlag