Mirki jest jakiś sposób by zamienić "x" na wartości z drugiego wiersza? Tzn chodzi mi o to by zamiast x w kolumnie B były wartości z drugiego wiersza w kolumnie B. Screen poglądowy oryginalny plik jest troszkę większy. Zależy mi na automatyzacji procesu bo mam w sumie 300 kolumn do takiej obróbki. Ewentualnie jest jakiś sposób na automatyczne rozpisanie funkcji "jeżeli" aby powstawała według schematu =JEŻELI(B3="x";$B$2;JEŻELI(C3="x";$C$2;JEŻELI(D3="x";$D$2;JEŻELI(E3="x";$E$2;"brak danych")))) tylko do dajmy na to kolumny KZ? #excel
#excel
Sub zamien()
Dim kol As Range
Application.ScreenUpdating = False
For Each kol In Columns("b:kz")
kol.Range(Cells(3, 1), Cells(26, 1)).Replace "x", kol.Cells(2, 1)
Next
Application.ScreenUpdating = True
End Sub