VBA复制并过去到设定范围内的下一个空白单元格

Question

我创建了以下vba代码来复制和粘贴数据。我正在创建的报告捕获每小时更新的历史数据。我需要能够粘贴到B10下面的下一个可用单元格，但无法弄清楚如何做到这一点，任何建议？谢谢！

Range("A7").Select
Selection.Copy
Range("B10").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False

Answer 1

代码假定您想要单元格中的值＆＃34; A7＆＃34;被发送到B10下面的第一个可用（空白）单元格：

$('#link-element').click(function(){

        var REL = $(this).attr("rel");
        var URL = 'centralcommand.php';
        var dataString = 'id=' + REL;

        $.ajax({
          type: "POST",
          url: URL,
          data: dataString,
          cache: false,
          success : function() {
            alert('success')
          }
        });
});