I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
Umiddelbart vil jeg tror, at dette løser problemet:
With ActiveSheet.Range("D3") .FormulaR1C1 = "=IF(RC[-1]>0,RC[-3],"""")" .AutoFill Destination:=Range("D3:D182"), Type:=xlFillDefault End With
Problemet med din kode er, at ActiceCell ikke nødvendigvis er Range("D3"), fordi markøren ikke nødvendigvis er her, men f.eks. udmærket kan være placeret i celle D2 (afhængigt af f.eks. den øvrige kode).
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.