GoldenLine
Zaloguj się
Paweł Ciupa

Paweł Ciupa Analityk sprzedazy,
Joart

Temat: Zestawienie/doapsowanie ze sobą dwóch kolumn

Witam, mam problem z automatycznym dopasowaniem ze soba 2óch kolumn, tak żeby duplikaty były w tej samej linii a wartości unikalne z drugiej kolumny zostały uzupełniane o zero. Proszę o jakąś formułkę lub makro.


Obrazek
Paweł Ciupa edytował(a) ten post dnia 01.04.11 o godzinie 14:18
Link do wypowiedziLink
Maciej Bartosiak

Maciej Bartosiak IT CONSULTANT

Temat: Zestawienie/doapsowanie ze sobą dwóch kolumn

ja bym pewnie użył "wyszukaj.pionowo". Dokładnie nie wiem o co Ci chodzi, opisz bardziej problem, może załącz plik, pewnie coś pomoge:)Maciej Bartosiak edytował(a) ten post dnia 02.04.11 o godzinie 10:32
Link do wypowiedziLink
Paweł Ciupa

Paweł Ciupa Analityk sprzedazy,
Joart

Temat: Zestawienie/doapsowanie ze sobą dwóch kolumn

Dzięki za zainteresowanie. Pliku nie wrzucę bo w pracy został, ale chodzi o to że mam 3 kolumny. W prawej kolumnie załóżmy jest 100 kodów a w lewej 50 (pokrywają się), chciałbym żeby takie same kody były w jednej linii względem prawej kolumny, a powstałe puste miejsca ( w kolumnie A) wypełniły się zerami w kolumnie B. Mam nadzieję, że troszkę rozjaśniłem.
Link do wypowiedziLink

konto usunięte

Temat: Zestawienie/doapsowanie ze sobą dwóch kolumn

Witam,
jeżeli w kolumnie C (zakres C1:C20) masz dane kluczowe, natomiast w zakresie A1:B8 dane do dopasowania, wtedy wydaje mi się, że wystarczy makro (może ono nie być optymalne). Pozdrawiam.



Sub Kody()

 Dim tbl() As Variant, i As Long, j As Long

 tbl = Range("A1:B8")

 Range("A1:B18").ClearContents

 For i = 1 To 20

   For j = 1 To 8

     If tbl(j, 1) = Cells(i, 3).Value Then

        Cells(i, 2).Value = tbl(j, 2)

        Cells(i, 1).Value = tbl(j, 1)

     End If

   Next j

    If Cells(i, 2).Value = "" Then Cells(i, 2).Value = 0

 Next i

End Sub
Darek J. edytował(a) ten post dnia 03.04.11 o godzinie 19:55
Link do wypowiedziLink
Paweł Ciupa

Paweł Ciupa Analityk sprzedazy,
Joart

Temat: Zestawienie/doapsowanie ze sobą dwóch kolumn

Niestety to makro nie działa.Wszystkie wartości w kolumnie B wypełnia zerami i usuwa prawie całą kolumnę A. Probowalem je zmodyfikować, ale bezskutecznie.
Link do wypowiedziLink

konto usunięte

Temat: Zestawienie/doapsowanie ze sobą dwóch kolumn

Witam,
widocznie nieprawidłowo to makro użyłeś lub wprowadziłeś dane niezgodnie z założeniem makra.

1. Makro nie usuwa wartości z kolumny A tylko je dopasowuje do odpowiednich danych w kolumnie C (wartości z kolumny B także są dopasowywane).
2. W kolumnie B wypełniane zerami są tylko puste komórki pozostałe po wykonaniu operacji z punktu 1, a nie wszystkie wartości.

Potestuj, a jak masz problemy, to wyślij mi swój adres mailowy, to wyślę Ci mailem odpowiedni załącznik, pozdrawiamDarek J. edytował(a) ten post dnia 02.04.11 o godzinie 19:19
Link do wypowiedziLink
Paweł Ciupa

Paweł Ciupa Analityk sprzedazy,
Joart

Temat: Zestawienie/doapsowanie ze sobą dwóch kolumn

Faktycznie działa. Coś popsułem jak przerabiałem dla większych zakresów. Dzięki wielkie. Pozdrawiam
Link do wypowiedziLink
« Wróć do tematów
Odpowiedz

Podobne tematy


Następna dyskusja:

sortowanie z dwóch kolumn




Wyślij zaproszenie do
Anuluj