Excel - Obracunski List Gradevinske Knjige

Sub ResetirajList() ' Clears all data rows except headers and formulas Dim answer As VbMsgBoxResult answer = MsgBox("Obrisati sve podatke? (formule ostaju)", vbYesNo + vbQuestion, "Potvrda") If answer = vbYes Then Rows("3:100").ClearContents Range("A3").Select MsgBox "List je resetiran. Formule u stupcima G i I ostaju." End If End Sub

A102: "Ukupno bez PDV:" B102: =SUM(G:G) A103: "PDV (25%):" B103: =B102*0.25 obracunski list gradevinske knjige excel

m²,m³,kom,kg,t,dan, sat Save the file as: Sub ResetirajList() ' Clears all data rows except

This is a specialized request for a (translation: obračunski list građevinske knjige ) in Excel. | A | B | C | D

| A | B | C | D | E | F | G | H | I | |---|---|---|---|---|---|---|---|---| | RB | Datum | Opis rada / materijala | Jedinica mjere | Količina | Jed. cijena (€) | Ukupno (€) | PDV (%) | Iznos sa PDV |

A105: "Datum izdavanja:" B105: (manual entry)