Bu makroyu her çalıştırdığımda neden rastgele bir sıfır görünüyor?

Aşağıdaki makroyu çalıştırmak için bir komut düğmesi kullanıyorum, ancak çalıştığım her seferde rastgele bir hücrede bir sıfır görünmeye devam ediyor makroyu çalıştırıyorum. Kullanılmakta olan makro kaydedilmiş bir makrodan kaynaklanıyor. Kaydedilen makro, başka bir sayfadan referans almak ve diğerinde otomatik dosyalama yapmaktır.Bu makroyu her çalıştırdığımda neden rastgele bir sıfır görünüyor?

Sub Refresh() 
    ActiveCell.FormulaR1C1 = "='raw data'!R[-5]C" 
    Range("A7").Select 
    Selection.AutoFill Destination:=Range("A7:A500"), Type:=xlFillDefault 
End Sub

kaynak

2016-04-13 Luis

rastgele hücresinde bir 0 koyardı bu kodda bir şey yok. Formülün sonucu, düğmeye basmanız sırasında aktif olan hücreye gönderilir. Formül boş bir hücreye işaret ediyorsa, bir "0" üretecektir - bu ne demek oluyor? –

Evet, karışıklık için özür dilerim ve ayrıca bunu farkettim. Bu sıfırı eklememenin bir yolu var mı? – Luis

Formülünüzü değiştirebilir misiniz? '= IF ('ham veri'! A2 =" "," ", 'ham veri'! A2)' – Davesexcel

Sana kodu çalıştırdığınızda activecell bulunduğu öyle varsayalım.

Bu sorun çözecektir.

Range("A7:A500") = "='raw data'!R[-5]C"

Sadece ek bir seçenek eklemek için:

Sub Values() 
Range("A7:A500").Value = Sheets("raw data").Range("A2:A500").Value 
End Sub

kaynak

2016-04-13 16:06:02 Davesexcel

Aslında, bu her hücreye görece bir formül ekleyecektir. OP'nin, her hücrenin içine kopyalanan ham veri sayfasındaki belirli bir hücrenin sonucunu istediğini düşünüyorum. –

Yorumumu daha önce görebildiniz mi? – Luis

@MacroMan, formülün göreli değeri – Davesexcel

Bu makroyu her çalıştırdığımda neden rastgele bir sıfır görünüyor?

cevap

İlgili konular