adresa bunky
Range("a1").Value = Cells (38,7).Address ( False, False)
'hodnoty v závorce určují odkaz $38 - $G