找不到工作表的最后使用的行

时间:2018-08-13 22:02:19

标签: excel-vba

我想从“模板”工作表中复制一个表,并将其粘贴到所有其他工作表(Sheet1除外)中最后一个表的后面1行。每个表之间有1个空行。

我检查了LastLine(PI 12成就)的值是否正确。 但是,find方法无法在工作表中找到LastLine的值。 R的返回值为Nothing。 “ .Cells(RowNr + 2,1).Paste”也不起作用。调试器总是在这一行停止。

<?php
  // Begin layout builder
  if( have_rows('layout_builder') ):
  while ( have_rows('layout_builder') ) : the_row();
?>

  <?php

    // Begin layout - Copy
    if( get_row_layout() == 'copy' ):


    $gridType = get_sub_field('grid_type');

    // Begin repeater
    if( have_rows('copy') ):

    // Grid
    echo '<div class="grid-wrap">';

    while ( have_rows('copy') ) : the_row();

  ?>

    <div class="<?php

      if ( $gridType == 'quarter' ) {
        echo 'quarter';
      }

      if ( $gridType == 'third' ) {
        echo 'third';
      }

      if ( $gridType == 'half' ) {
        echo 'half';
      }

      if (  $gridType == 'full' ) {
        echo 'full';
      }

    ?>">

      <?= get_sub_field('copy'); ?>

    </div>

  <?php
    // End repeater
    endwhile;

    // End grid
    echo '</div>';

    endif;

    // End layout
    endif;
  ?>

<?php // End layout builder
  endwhile;
  endif;
?>

0 个答案:

没有答案