Is there any way to store the format of a certain cell into a variable? For
example:

frmt = Range("A1").format

.... Then I could do something like:

function sum_format(rng)
for each rn in rng
if (rn.format = frmt) then
temp = temp + rn
end if
next
sum_format = temp
end function

In which the function would sum all cells that only have the format as cell A1