返回列表 上一主題 發帖

DDE記錄如何複製在不同工作表

回復 10# GBKEE

麻煩大大幫我看看 謝謝
test.zip (106.73 KB)

TOP

回復 11# jerrystock
  1. Private Sub Worksheet_Calculate()  'Sheet6模組的重算事件
  2.     Me.Activate         '*****加上這程式碼
  3.     With Range("A" & Rows.Count).End(xlUp).Offset(1).Resize(1, 9)
  4.         .Value = [A7].Resize(, 9).Value
  5.         .Select
  6.     End With
  7. End Sub
複製代碼

TOP

謝謝GBKEE大大百忙中抽空指導  最近四天連假等開盤再來試試
我想經大大看過應該是沒問題了  感謝您!!

TOP

        靜思自在 : 靜坐常恩己過、閒談莫論人非。
返回列表 上一主題