如何实现单元格内容动态传递

wjmm

　　　　　　　　　　　　　　　　　　　

[ 本帖最后由 wjmm 于 2009-5-18 08:08 编辑 ]

热浪2006

Dim rng, c1, c2

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   If Target.Column = 1 Then
      rng = Target.Address
      Exit Sub
   ElseIf Target.Column = 2 Then
      c1 = Target
      Exit Sub
   ElseIf Target.Column = 3 Then
      c2 = Target
      Range(rng) = c1 & c2
   End If
End Sub

wjmm

谢谢 热浪2006

wjmm

之所以删除提问的问题，是因为现在看来提出该问题太愚蠢了，感到羞愧

office2008

清风版主不会删除问得简单的问题，你误会了，我估计是你问的问题，没有标题

清风_ll

原帖由 office2008 于 2009-5-18 09:48 发表
清风版主不会删除问得简单的问题，你误会了，我估计是你问的问题，没有标题

理解错误了，是楼主在问题得到解决后自己删除了问题，就算是高手，也可能会问一些看起来很“愚蠢”的问题。
现在又自己删除了标题，这是不尊重他人与论坛的做法。
现给予警告。

寅鹞

支持版主！

wjmm

如果不删除那个问题。我以后怎么好意思在论坛里混
又，每当别人在论坛上回答一个我提出的问题，我都会在该论坛回答别人的2个-3个问题，用以回报论坛

原帖由 清风_ll 于 2009-5-18 10:19 发表

理解错误了，是楼主在问题得到解决后自己删除了问题，就算是高手，也可能会问一些看起来很“愚蠢”的问题。
现在又自己删除了标题，这是不尊重他人与论坛的做法。
现给予警告。

taller

原帖由 wjmm 于 2009-5-18 10:51 发表
如果不删除那个问题。我以后怎么好意思在论坛里混
又，每当别人在论坛上回答一个我提出的问题，我都会在该论坛回答别人的2个-3个问题，用以回报论坛

试想如果论坛中对于已解决的帖子，楼主都删除原问题，大家还能够从论坛中搜到任何有价值的东西吗？

闻道有先后，没有任何问题是“愚蠢”的

wjmm

问题见http://club.excelhome.net/thread-434626-1-1.html

原帖由 taller 于 2009-5-18 12:07 发表


试想如果论坛中对于已解决的帖子，楼主都删除原问题，大家还能够从论坛中搜到任何有价值的东西吗？

闻道有先后，没有任何问题是“愚蠢”的