Witajcie
Przepraszam od razu za swój brak wiedzy jestem pierwszy raz na forum.
Stworzyłem sobie makro, które wykonuje kilka czynności
Punktem odniesienia jest "Komorka"
‚ ActiveSheet.Range(Komorka).Value = Cells.Range(Komorka).Value
‚ActiveSheet.Range(Komorka).Offset(0, 1).Value = Cells.Range(Komorka).Offset(0, 3).Value
‚ActiveSheet.Range(Komorka).Offset(0, 3).FormulaR1C1 = "=ROUND(RC[-1]*RC[-5],2)"
‚ActiveSheet.Range(Komorka).FormulaR1C1 = "=" & Cells.Range(Komorka).Value & "+RC[3]"
Problem tylko jest taki:
Jeżeli wartość "Komorka" jest liczbą całkowitą instrukcja
‚ActiveSheet.Range(Komorka).FormulaR1C1 = "=" & Cells.Range(Komorka).Value & "+RC[3]"
tworzy formułę, w której zamienia starą wartość "Komorka" zamienia na liczbę i dodaje do niej wartość komórki "+RC[3]"
Natomiast jeżeli wartość komórki nie jest liczbą całkowitą wyrzuca błąd:
Run-time error ' 1004' :
Application defined or object defined error
Prośba o pomoc