带有空白单元格的excel vba动态值答案

【问题标题】：excel vba dynamic values with blank cells带有空白单元格的excel vba动态值
【发布时间】：2015-04-16 14:08:15
【问题描述】：

我是 vba 新手，我需要在工作表中取两个值。示例如下：

B10=日期........N10=: ...... P10=Feb-15....

B10 的范围有日期，N10 有冒号，P10 有日期值，C10:O10 有空单元格。

所以每次我都要给

Selection.End(xlToRight).Select.

如何使这个值动态化。

日期：2 月至 15 日日期 : Mar-15 日期 : Apr-15 日期 : May-15 日期 : Jun-15 日期 : Jul-15 日期：8 月 15 日日期 : Sep-15 日期：10 月 15 日日期 : Nov-15 日期：12 月 15 日

请大家帮忙。

【问题讨论】：

标签： excel vba

【解决方案1】：

Excel Macros = "bad code"，它们总是使用 "selection" 对象和 .Select 方法在不需要时...

我不知道你想做什么，但如果只是连接这三个单元格，你可以使用类似的东西：

for i = 1 to intLastRow
    with wsWorksheet
        .cells(i,1) = .cells(i,2) & .cells(i, 13) & .cells(i, 15)
    end with
next

但我真的不明白这个问题。为什么不在列中有一个公式="Date: " & text(P10, "mmm-dd")

【讨论】：