Heretyk [ Generaďż˝ ]
VBA w Excelu
Mam następujący problem: próbuje wstawić w szereg komórek Excela funkcję za pomocą metody Cell(x, y) = Funkcja (jako string).
For x = koniec To 2 + okres Step -1
Cells(x, 8) = "=IF(G" & x & ">$Q$4;-1;IF(G" & x & "<$Q$3;1;H" & x - 1 & "))"
Next x
For y = koniec - 1 To 2 + okres Step -1
Cells(y, 9) = "=IF(H" & y & "=F" & y + 1 & ";1;-1)"
Next y
Niestety, jeśli przed = nie dam spacji to VB wyświetla błąd. A jeśli dam to wstawiane są formuły ze spacją na początku, przez co nie są traktowane jak formuły. Jak wstawić te formuły bez tej spacji lub skasować tą spację z poziomu VB?
Heretyk [ Generaďż˝ ]
up
pablo397 [ sport addicted ]
ale o ktorej spacji mowisz?
Heretyk [ Generaďż˝ ]
Masz rację, muszę uściślić:
"=IF(G" & x & ">$Q$4;-1;IF(G" & x & "<$Q$3;1;H" & x - 1 & "))"
Next x - taki kod nie działa.
Działa natomiast taki kod: "[SPACJA]=IF(G" & x & ">$Q$4;-1;IF(G" & x & "<$Q$3;1;H" & x - 1 & "))"
Next x
Ogólnie dodanie spacji przed =, wykasowanie tego równa się itd powoduje, ze wszystko działa bez błędu, ale jest jeden drobiazg - ze spacją albo bez = kod nie działa, bo to nie jest poprawna deklaracja formuły (wpisywany jest jej tekst, ale tekst nie działa bez = na początku)
Heretyk [ Generaďż˝ ]
up
Heretyk [ Generaďż˝ ]
up
albz74 [ Legend ]
Rozumiem, że podawałeś to w ten sposób?
Cells(x, 8).Formula = "=i tak dalej"