各位老师vba如何数值复制到隐藏工作表内 ，谢谢各位老师

WZL一杯清茶

vba如何数值自动复制到隐藏工作表内，工作表不隐藏可以使用，一隐藏无法链接。Sub Macro8()'
' Macro8 Macro
'

'
    Range("B6:J15").Select
    Selection.Copy
    Sheets("试验数据库").Select
    Range("B65536").Select
    Selection.End(xlUp).Select
    ActiveCell.Offset(1, 0).Range("A1").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Sheets("试验生产信息输入").Select
    Range("B6:J15").Select
    Application.CutCopyMode = False
    Selection.ClearContents
    Range("B15").Select
End Sub