https://bugs.documentfoundation.org/show_bug.cgi?id=163083
--- Comment #11 from Bruh <[email protected]> --- Hello, I reduced the macro lines. It worked fine on 24.2.6.2 Then I installed the new 24.8.3.2 . It froze. Problem seems to be at the end (after Y24 cell calculatiosn). Please try coping the sheets of the ealier attached file to another blank .ods file and then copy/paste the macro below. I tried the following Macro: Sub Macro0() Sheets("NTN-B 2055 cupom1").Select Range("AK6").Select ActiveCell.FormulaR1C1 = Sheets("Central1").Range("A24") Range("AK7").Select ActiveCell.FormulaR1C1 = Sheets("Central1").Range("B23") Range("AI1").GoalSeek Goal:=60951, ChangingCell:=Range("AK2") Range("AK2").Select Selection.Copy Sheets("Central1").Select Range("B24").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Range("A22").Select Sheets("NTN-B 2055 cupom1").Select Range("AK7").Select ActiveCell.FormulaR1C1 = Sheets("Central1").Range("c23") Range("AI1").GoalSeek Goal:=60951, ChangingCell:=Range("AK2") Range("AK2").Select Selection.Copy Sheets("Central1").Select Range("c24").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Range("A22").Select Sheets("NTN-B 2055 cupom1").Select Range("AK7").Select ActiveCell.FormulaR1C1 = Sheets("Central1").Range("d23") Range("AI1").GoalSeek Goal:=60951, ChangingCell:=Range("AK2") Range("AK2").Select Selection.Copy Sheets("Central1").Select Range("d24").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Range("A22").Select Sheets("NTN-B 2055 cupom1").Select Range("AK7").Select ActiveCell.FormulaR1C1 = Sheets("Central1").Range("e23") Range("AI1").GoalSeek Goal:=60951, ChangingCell:=Range("AK2") Range("AK2").Select Selection.Copy Sheets("Central1").Select Range("e24").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Range("A22").Select Sheets("NTN-B 2055 cupom1").Select Range("AK7").Select ActiveCell.FormulaR1C1 = Sheets("Central1").Range("f23") Range("AI1").GoalSeek Goal:=60951, ChangingCell:=Range("AK2") Range("AK2").Select Selection.Copy Sheets("Central1").Select Range("f24").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Range("A22").Select Sheets("NTN-B 2055 cupom1").Select Range("AK7").Select ActiveCell.FormulaR1C1 = Sheets("Central1").Range("g23") Range("AI1").GoalSeek Goal:=60951, ChangingCell:=Range("AK2") Range("AK2").Select Selection.Copy Sheets("Central1").Select Range("g24").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Range("A22").Select Sheets("NTN-B 2055 cupom1").Select Range("AK7").Select ActiveCell.FormulaR1C1 = Sheets("Central1").Range("h23") Range("AI1").GoalSeek Goal:=60951, ChangingCell:=Range("AK2") Range("AK2").Select Selection.Copy Sheets("Central1").Select Range("h24").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Range("A22").Select Sheets("NTN-B 2055 cupom1").Select Range("AK7").Select ActiveCell.FormulaR1C1 = Sheets("Central1").Range("i23") Range("AI1").GoalSeek Goal:=60951, ChangingCell:=Range("AK2") Range("AK2").Select Selection.Copy Sheets("Central1").Select Range("i24").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Range("A22").Select Sheets("NTN-B 2055 cupom1").Select Range("AK7").Select ActiveCell.FormulaR1C1 = Sheets("Central1").Range("j23") Range("AI1").GoalSeek Goal:=60951, ChangingCell:=Range("AK2") Range("AK2").Select Selection.Copy Sheets("Central1").Select Range("j24").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Range("A22").Select Sheets("NTN-B 2055 cupom1").Select Range("AK7").Select ActiveCell.FormulaR1C1 = Sheets("Central1").Range("k23") Range("AI1").GoalSeek Goal:=60951, ChangingCell:=Range("AK2") Range("AK2").Select Selection.Copy Sheets("Central1").Select Range("k24").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Range("A22").Select Sheets("NTN-B 2055 cupom1").Select Range("AK7").Select ActiveCell.FormulaR1C1 = Sheets("Central1").Range("l23") Range("AI1").GoalSeek Goal:=60951, ChangingCell:=Range("AK2") Range("AK2").Select Selection.Copy Sheets("Central1").Select Range("l24").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Range("A22").Select Sheets("NTN-B 2055 cupom1").Select Range("AK7").Select ActiveCell.FormulaR1C1 = Sheets("Central1").Range("m23") Range("AI1").GoalSeek Goal:=60951, ChangingCell:=Range("AK2") Range("AK2").Select Selection.Copy Sheets("Central1").Select Range("m24").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Range("A22").Select Sheets("NTN-B 2055 cupom1").Select Range("AK7").Select ActiveCell.FormulaR1C1 = Sheets("Central1").Range("n23") Range("AI1").GoalSeek Goal:=60951, ChangingCell:=Range("AK2") Range("AK2").Select Selection.Copy Sheets("Central1").Select Range("n24").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Range("A22").Select Sheets("NTN-B 2055 cupom1").Select Range("AK7").Select ActiveCell.FormulaR1C1 = Sheets("Central1").Range("o23") Range("AI1").GoalSeek Goal:=60951, ChangingCell:=Range("AK2") Range("AK2").Select Selection.Copy Sheets("Central1").Select Range("o24").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Range("A22").Select Sheets("NTN-B 2055 cupom1").Select Range("AK7").Select ActiveCell.FormulaR1C1 = Sheets("Central1").Range("p23") Range("AI1").GoalSeek Goal:=60951, ChangingCell:=Range("AK2") Range("AK2").Select Selection.Copy Sheets("Central1").Select Range("p24").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Range("A22").Select Sheets("NTN-B 2055 cupom1").Select Range("AK7").Select ActiveCell.FormulaR1C1 = Sheets("Central1").Range("q23") Range("AI1").GoalSeek Goal:=60951, ChangingCell:=Range("AK2") Range("AK2").Select Selection.Copy Sheets("Central1").Select Range("q24").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Range("A22").Select Sheets("NTN-B 2055 cupom1").Select Range("AK7").Select ActiveCell.FormulaR1C1 = Sheets("Central1").Range("r23") Range("AI1").GoalSeek Goal:=60951, ChangingCell:=Range("AK2") Range("AK2").Select Selection.Copy Sheets("Central1").Select Range("r24").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Range("A22").Select Sheets("NTN-B 2055 cupom1").Select Range("AK7").Select ActiveCell.FormulaR1C1 = Sheets("Central1").Range("s23") Range("AI1").GoalSeek Goal:=60951, ChangingCell:=Range("AK2") Range("AK2").Select Selection.Copy Sheets("Central1").Select Range("s24").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Range("A22").Select Sheets("NTN-B 2055 cupom1").Select Range("AK7").Select ActiveCell.FormulaR1C1 = Sheets("Central1").Range("t23") Range("AI1").GoalSeek Goal:=60951, ChangingCell:=Range("AK2") Range("AK2").Select Selection.Copy Sheets("Central1").Select Range("t24").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Range("A22").Select Sheets("NTN-B 2055 cupom1").Select Range("AK7").Select ActiveCell.FormulaR1C1 = Sheets("Central1").Range("u23") Range("AI1").GoalSeek Goal:=60951, ChangingCell:=Range("AK2") Range("AK2").Select Selection.Copy Sheets("Central1").Select Range("u24").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Range("A22").Select Sheets("NTN-B 2055 cupom1").Select Range("AK7").Select ActiveCell.FormulaR1C1 = Sheets("Central1").Range("v23") Range("AI1").GoalSeek Goal:=60951, ChangingCell:=Range("AK2") Range("AK2").Select Selection.Copy Sheets("Central1").Select Range("v24").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Range("A22").Select Sheets("NTN-B 2055 cupom1").Select Range("AK7").Select ActiveCell.FormulaR1C1 = Sheets("Central1").Range("w23") Range("AI1").GoalSeek Goal:=60951, ChangingCell:=Range("AK2") Range("AK2").Select Selection.Copy Sheets("Central1").Select Range("w24").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Range("A22").Select Sheets("NTN-B 2055 cupom1").Select Range("AK7").Select ActiveCell.FormulaR1C1 = Sheets("Central1").Range("x23") Range("AI1").GoalSeek Goal:=60951, ChangingCell:=Range("AK2") Range("AK2").Select Selection.Copy Sheets("Central1").Select Range("x24").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Range("A22").Select Sheets("NTN-B 2055 cupom1").Select Range("AK7").Select ActiveCell.FormulaR1C1 = Sheets("Central1").Range("y23") Range("AI1").GoalSeek Goal:=60951, ChangingCell:=Range("AK2") Range("AK2").Select Selection.Copy Sheets("Central1").Select Range("y24").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Range("A22").Select Sheets("NTN-B 2055 cupom1").Select Range("AK2").Select ActiveCell.FormulaR1C1 = Sheets("Central1").Range("D11") Range("AK6").Select ActiveCell.FormulaR1C1 = Sheets("Central1").Range("A24") Range("AK7").Select ActiveCell.FormulaR1C1 = Sheets("Central1").Range("Q23") Sheets("Central1").Select Range("A1").Select End Sub -- You are receiving this mail because: You are the assignee for the bug.
