Mefisto...diabeĹ czy anioĹ?
Witam.
Probuje napisać makro, które umożliwi mi automatyczne wywołanie funkcji wyszukaj pionowo dla określonej sytuacji.
W chwili obecnej wyglada to tak:
Range("D1").Select
ActiveCell.FormulaR1C1 = "*"
Selection.AutoFill Destination:=Range("D1:D28")
Range("D1:D28").Select
Range("B1").Select
ActiveCell.FormulaR1C1 = "=VLOOKUP(RC[-1],C[1]:C[2],2,0)"
Selection.AutoFill Destination:=Range("B1:B28")
Range("B1:B28").Select
Wiele tu brakuje i niektóre rzeczy pewnie są zbędne zapewne :).
Co ma robić konkretnie?
Mam dane w kolumnie A i C. Wyszukuje dane z kolumny C w kolumnie A. Kiedy funkcja znajdzie takie same wpisy stawia * w kolumnie B, jeśli nie ma to wiadomo #N/D!.
Problem polega na tym, że nie mam pojęcia jak się określa liczbę wierszy w zależności od ilości wpisów (pewnie jakaś pętla sprawdzająca czy są wpisy). To samo się tyczy w tym przypadku kolumny B jak i D.
Kolejna sprawa to kolorowanie. Chciał bym aby automatycznie komórki w kolumnie A, które mają swoje odpowiedniki w C kolorowały się na zielono (czyli jeśli funkcja zwraca TRUE), jeśli danych wartości nie ma w C ma się kolorować na czerwono.
Czy da sie wpisać inny tekst niż wspomniane #N/D!, jeśli funkcja zwraca FALSE? Np. jeśli jest True to niech będzie ta * a jak FALSE to "NIE" albo coś w tym stylu.
I ostatnie. Dobrze by było jak by to makro po wszystkim wrzucało wartości pokolorowane na czerwono do nowo utworzonego arkusza.
Pytania bardzo 'lamerskie', ale niestety dopiero raczkuje w tym temacie ;/
Będę wdzięczny za pomoc :)
zanotowane.pl doc.pisz.pl pdf.pisz.pl katkaras.opx.pl
Probuje napisać makro, które umożliwi mi automatyczne wywołanie funkcji wyszukaj pionowo dla określonej sytuacji.
W chwili obecnej wyglada to tak:
Range("D1").Select
ActiveCell.FormulaR1C1 = "*"
Selection.AutoFill Destination:=Range("D1:D28")
Range("D1:D28").Select
Range("B1").Select
ActiveCell.FormulaR1C1 = "=VLOOKUP(RC[-1],C[1]:C[2],2,0)"
Selection.AutoFill Destination:=Range("B1:B28")
Range("B1:B28").Select
Wiele tu brakuje i niektóre rzeczy pewnie są zbędne zapewne :).
Co ma robić konkretnie?
Mam dane w kolumnie A i C. Wyszukuje dane z kolumny C w kolumnie A. Kiedy funkcja znajdzie takie same wpisy stawia * w kolumnie B, jeśli nie ma to wiadomo #N/D!.
Problem polega na tym, że nie mam pojęcia jak się określa liczbę wierszy w zależności od ilości wpisów (pewnie jakaś pętla sprawdzająca czy są wpisy). To samo się tyczy w tym przypadku kolumny B jak i D.
Kolejna sprawa to kolorowanie. Chciał bym aby automatycznie komórki w kolumnie A, które mają swoje odpowiedniki w C kolorowały się na zielono (czyli jeśli funkcja zwraca TRUE), jeśli danych wartości nie ma w C ma się kolorować na czerwono.
Czy da sie wpisać inny tekst niż wspomniane #N/D!, jeśli funkcja zwraca FALSE? Np. jeśli jest True to niech będzie ta * a jak FALSE to "NIE" albo coś w tym stylu.
I ostatnie. Dobrze by było jak by to makro po wszystkim wrzucało wartości pokolorowane na czerwono do nowo utworzonego arkusza.
Pytania bardzo 'lamerskie', ale niestety dopiero raczkuje w tym temacie ;/
Będę wdzięczny za pomoc :)