Repopulujte bunky zlučované v programe Excel - Excel, zlúčte sa

Potrebujem exportovať sériu 5000 dokumentov Excel do MySQL. Problém je, že súbory programu Excel boli opakovane zlúčené. (Pozri odkaz na snímku obrazovky: http://cgtest.forakergroup.com/images/excel.png )

     A1    CHARITY    NUM     AMT
+    A2    name       1      $100
| +  A3               2      $105
| |  A4               2      $105
| L  A5               5      $105
L    A6               5      $105
+    A7    name2      1      $100
| +  A8               2      $105
| |  A9               2      $105
| L  A10              5      $105
L    A11              5      $105

Potrebujem vložiť charitatívny názov (v súčasnosti v A2) do každého z nasledujúcich stĺpcov, kde bol zlúčený (A3, A4 atď.).

Existuje nejaká funkcia v programe Excel, ktorá opätovne obnoví zlúčené bunky?

odpovede:

Ak požadujete to, čo si myslím, že ste potom funkcia nie je potrebná (ani kód). Stačí vybrať príslušný stĺpec Domov> Úprava - Nájsť & Vybrať, Bloky, kľúč =, hore, ctrl+vstúpiť.

Nasledujúce makro vyplní všetky medzery, ak sú všetky bunky nezmazané.

Sub Fill_Empty()
Dim oRng As Range
Set oRng = Selection
Selection.Font.Bold = True
Selection.SpecialCells(xlCellTypeBlanks).Select
Selection.Font.Bold = False
Selection.FormulaR1C1 = "=R[-1]C"
oRng.Copy
oRng.PasteSpecial Paste:=xlValues, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
End Sub

Vďaka Levasseurovi za návrh na napísanie makra.