2012-04-20 127 views
1

所以我有這樣的事情每一行(全部在A列,單獨行):Excel公式,將標題下方

Title01

atext atext atext atext atext

btext btext btext btext btext

CTEXT CTEXT CTEXT CTEXT CTEXT

title02

atext atext atext atext atext

btext btext btext btext btext

CTEXT CTEXT CTEXT CTEXT CTEXT

title03

atext atext atext atext atext

btext btext btext btext btext

ctext ctext ctext ctext CTEXT

我需要的解決方案,以改變它像這樣:

Title01

Title01 - atext atext atext atext atext

Title01 - btext btext btext btext btext

Title01 - ctext ctext ctext ctext ctext

Title02

Title02 - atext atext atext atext atext

Title02 - btext btext btext btext btext

Title02 - CTEXT CTEXT CTEXT CTEXT CTEXT

Title03

Title03 - atext atext atext atext atext

Title03 - btext btext btext btext btext

Title03 - CTEXT CTEXT CTEXT CTEXT CTEXT

** Basicaly - 添加(題目)前綴,以每列一排,直到下一個標題... 是否有任何想法如何,我可以做到這一點具有約3000行完全以和他們不是每個標題下的相同大寫金額...

謝謝!**

+0

總是一個標題行後面跟着3行文本? – 2012-04-20 20:09:53

+0

對不起,忘了提及......總是有一個標題行,從不同的行數開始直到下一個標題... – enflam3 2012-04-20 20:23:09

+0

那麼,如何從下面的文本中告訴標題?你會使用什麼規則? – 2012-04-20 20:30:04

回答

2
  • 進入細胞B1把公式=A1
  • 進入細胞B2把公式=IF(MID(A2, 1,5)="Title", A2, B1)
  • 下填補這一公式數據的最後一行。
  • 細胞C1把公式=IF(MID(A1, 1,5)="Title", A1, B1 & " - " & A1)
  • 填寫。

現在你有你想要的C列。你可以複製,然後粘貼特殊>值來擺脫公式。

+0

也工作解決方案謝謝你! – enflam3 2012-04-20 22:06:12

+0

+ 1爲配方解決方案! – 2012-04-21 05:47:34

0

你不能在一個單元格「推」本身爲其他細胞的條目。其他單元格必須是引用回標題的公式。所以你會有類似

A 
1 Title01 
2 =A1&"atext atext atext atext atext" 
3 =A1&"btext btext btext btext btext" 

等等下線。

+0

我忘了提及,我有大約3000行totaly,他們是不一樣在每個標題下... – enflam3 2012-04-20 20:21:27

+0

3000公式,然後。你能*做的是將標題,公式和文本全部放在單獨的列中,並使公式足夠聰明以便(搜索標題)和文本(如果存在相應的文本),否則爲空。 – mjfgates 2012-04-20 20:28:27

2
Sub Tester()  
    Dim c as Range, ttl as string 

    for each c in selection.cells 
     if lcase(c.value) like "*titletext*.txt" then 
      ttl = c.value 
     else 
      if len(c.value)>0 and len(ttl)>0 then 
       c.value = ttl & " - " & c.value 
      end if 
     end if 
    next c 
End sub 
+0

+ 1 :)尼斯和簡單:) – 2012-04-20 21:36:44

+0

該死的好!我正在嘗試着色,計數和甚至修改一堆其他代碼,但是這很簡單,而且很實用!謝謝!!! – enflam3 2012-04-20 21:47:12