ok....thank you...done

Hi, I have a very simple question - im lookinng for some icon that will give me fast possibility to define thickness (width) of colored line on the border of cells. Now i need to do this: First i need to define " Line arrangement " - which borders will be colored (left,bottom,ect. ....line...

it seems that you are right in the last sentence at all :) I have solution that works for both problems - principle (forget about my attachment): Im not going to use this macro for this complicated case (for some others yes), instead, Im going to prepare somewhere "source cell" in which I ...

you are trying to solve the problem "2)" right? I know what you mean...but: I cant use this formula...and copying down will not solve this... I need to use formula in J3....If I used the formula in F11 it would be applied on the cells F11 : J16 but the formulas in the cells will refer somw...

man...im not so terrible! :) I wrote that I can adjust.....in fact im proud of what I have done in 3 years with zero programming knowledge...spredaseeht that generates invoices,delivery notes,does plannin of goods, gpraphs....anyway... I have spent hours to prepare sample of my problem - see attachm...

hi guys...i dont want to use more than 3 conditions...BUT I want to get rid of...bringing the GUI up and clicking "OK" to let the formula actually calculate. After hiting "OK" the cell gets proper format (according to formula). Do you know why is this happenin...actually not happ...

Hi guys, the macro is awaysome! But...when I try to use "Absolute" addressing an error shows: "Property or method was not found: ReferencePosition". And I dont know what to do to make it work. Im not programmer, im not familiar with intuitive programmig - i just copy and adjust m...

well but this only results the content of addres put in this INDIRECT function as a text. Im looking for a function that results a value/string of formula put in such function as a text. Is there any such formula? example: I have in cell A1 written: =SUM(B1:B2) as a text and I want to make this text...

Hello everybody, I want to sell a Calc file in which I made macros and formulas that turns this file into a small orders-purchasing making system. I dont know how to make it properly to not violate law. Do I have to sell it under the GNU LGPL license? or any other license? Is it OK to mention this o...

yeah yeah! I need autorefreshing macro for PivotTables in new OO 3.3 / FO 3.4 ect... too. The simpliest and really working code that worked for me in OO 3.2 doestn work in 3.3 / 3.4 : http://user.services.openoffice.org/en/forum/viewtopic.php?f=20&t=6004 flaviopac: how looks your code for autore...

Hi guys, this code that refreshed desired pivot tables stopped working in FO 3.4 (maybe also in OO 3.3 or FO 3.3) Sub update_PT sheet = thisComponent.Sheets.getByName("Sheet1") PT = sheet.DataPilotTables.getByIndex(0) ' put (1) (2) etc to update second,third etc. pivot table in sheet PT.re...

How to find desired PT - I have no idea

Im not aware of such command. But I have a little brainstorm here which may pusch you forward: If you run this macro with the "...getbyindex(2)" and it will not return an error, you can be sure that you have somewhere in sheet this PT,but it is possibly too small and you have overlooked it...

hi, I had this problem too, but solved it long time ago. im not sure what was the problem but I suppose that it was the macro code to refresh pivot tables. So the code Im using now and it is working is this: http://www.oooforum.org/forum/viewtopic.phtml?t=100239 Sub update_PT sheet = thisComponent.S...

Hello, I want to use this: sub copy_range_and_paste_it_to_another_cell oSheet = thisComponent.Sheets.getByIndex(0) oSheet1 = thisComponent.Sheets.getByIndex(1) source = oSheet.getCellRangeByName("A1:z100").getRangeAddress() destination = oSheet1.getCellByPosition(0,0).getCellAddress() oShe...

Hello guys, Im looking for almost exact code, but I want it (copy and) paste all properties but not objects, sometimes not values ect. It means setting some flags for "copyrange()". How that code woudl be looking? I dont want to use macro recorder(UNO) because I need it work in hidden shee...

I have found the way how to obtain number of last emty row: Sub number_of_last_row_in_column_A sheet = ThisComponent.getSheets().getByName("sheet1") range = sheet.getCellRangeByPosition(0, 0, 0, 65535) empties = range.queryEmptyCells full = sheet.getCellRangeByPosition(0, 0, 0, empties.Ran...

yes! I found this macro that is working in hidden sheet!(no UNO) sub main4 Dim Doc As Object Dim Sheet As Object Dim CellRangeAddress As New com.sun.star.table.CellRangeAddress Dim CellAddress As New com.sun.star.table.CellAddress Doc = ThisComponent Sheet = Doc.Sheets(0) CellRangeAddress.Sheet = 0 ...

hello guys, I was able to record similar macro for my purpose BUT- it is possible to let this macro work in hidden sheet? I have tried but the cursor on unhidden (active)sheet is movin crazy...not good Anyway,my goal by creating this macro is to: copy A1:Z1 and paste it to end of data (adding new li...

wow! it started working! catch was that I had wrong names of pivottables(or datapilot) in that macro as you said - but to figure what are correct names(or indexes) of PT is hard- I had to try writing in that macro DataPilot1,DataPilot2,DataPilot3 ect. till DataPilot20 (I have many PT) and watch whic...

Villeroy: Hello, Im interested in your macro that refreshes specific pivot table (by name): REM  *****  BASIC  ***** Sub refresh_Pilots() REM Define a nested array of pairs with (SheetName, DPName) in the order of the desired refresh: sDPNames() = Array( _ Array("Sheet1","DataPilot1&q...