2017-02-25 77 views
0

我試圖將電子表格數據導入到CMS中,但在我們想要導入的4000+行電子表格的各個單元格上也有大約100條註釋。有沒有將評論內容複製到單元格中的函數或宏? (不像評論,只是純文本)將openoffice註釋複製到單元格的功能

+1

請更具體。 「...將評論內容複製到單元格中?」進入什麼細胞?同一個單元被評論?那麼細胞內容呢?該評論只是附加到內容?那麼數字單元格內容呢?該行爲後,該內容將不是數字。 –

回答

1

Openoffice APIinterface XSheetAnnotationsSupplier提供了一種方法getAnnotations。使用此功能可以將所有工作表註釋與其位置一起獲得。位置是在註釋被放置在小區的地址:

sub getAnnotations() 

oThisWorkbook = ThisComponent 
oActiveSheet = oThisWorkbook.CurrentController.ActiveSheet 

oAnnotations = oActiveSheet.Annotations 

for each oAnnotation in oAnnotations 
    lColumn = oAnnotation.Position.Column 
    lRow = oAnnotation.Position.Row 
    sText = oAnnotation.String 

    oCell = oActiveSheet.getCellByPosition(lColumn, lRow) 

    msgbox oCell.AbsoluteName & " has annotation: " & sText 
next 

end sub 

所以,你必須註釋(評論)和它們的細胞。

現在你必須決定你想要做什麼。正如我在評論中所說的那樣,在我看來,將註釋附加到單元格內容並不是一個好主意。這可能會使單元格內容無法讀取以供進一步處理。

相關問題