https://bugs.documentfoundation.org/show_bug.cgi?id=89216

raal <r...@post.cz> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |r...@post.cz
          Component|Spreadsheet                 |BASIC

--- Comment #1 from raal <r...@post.cz> ---
Hello,
you can identify cell content with this code.
Is this code what you need?


function isempty()

Dim Doc As Object
Dim Sheet As Object
Dim Cell As Object

Doc = ThisComponent
Sheet = Doc.Sheets(0)
Cell = Sheet.getCellByPosition(1,1)        'Cell "B2" (0-based!)



With com.sun.star.table.CellContentType
  Select Case Cell.Type
    Case .EMPTY 
      MsgBox "Content: Empty"
    Case .VALUE
      MsgBox "Content: Value"
    Case .TEXT
      MsgBox "Content: Text"
    Case .FORMULA
     MsgBox "Content: Formula"
  End Select
End With
end function

-- 
You are receiving this mail because:
You are the assignee for the bug.
_______________________________________________
Libreoffice-bugs mailing list
Libreoffice-bugs@lists.freedesktop.org
http://lists.freedesktop.org/mailman/listinfo/libreoffice-bugs

Reply via email to