Как осуществить поиск ячейки по её значению? |
Previous Top Next |
Code: |
{ ... } var Rnge: OleVariant; { ... }
Rnge := WS.Cells; Rnge := Rnge.Find('Is this text on the sheet?'); if Pointer(IDispatch(Rnge)) <> nil then {The text was found somewhere, so colour it pink} Rnge.Interior.Color := clFuchsia; |
©Drkb::04390
Взято с Delphi Knowledge Base: http://www.baltsoft.com/