Forum » Programiranje » Calc - Makri
Calc - Makri

Guti ::
Zdravo
Imam sledeč problem: Izdelat bi moral makro, ki od označene celice dalje izpiše neke cifre....
Uspelo mi je dobiti pozicijo od označene celice, ampak v obliki B2, potreboval pa bi jo v obliki (1,1)
Našel sem tudi funkcijo GetCellIndexes, s katero pa si še trenurno ne znam pomagat.
Hvala za razumevanje !
Imam sledeč problem: Izdelat bi moral makro, ki od označene celice dalje izpiše neke cifre....
Uspelo mi je dobiti pozicijo od označene celice, ampak v obliki B2, potreboval pa bi jo v obliki (1,1)
Našel sem tudi funkcijo GetCellIndexes, s katero pa si še trenurno ne znam pomagat.
Hvala za razumevanje !
Take me down to the paradise city
Where the grass is green
And the girls are pretty
Where the grass is green
And the girls are pretty
- spremenilo: Guti ()

Tutankhamun ::
Dim row As Integer
Dim col As Integer
col = ActiveCell.Column
row = ActiveCell.row
Cells(row, col) = "ta celica je oznacena"
Dim col As Integer
col = ActiveCell.Column
row = ActiveCell.row
Cells(row, col) = "ta celica je oznacena"
AMD Phenom QUAD 9950 Black Edition, 8GB

Guti ::
Sem sprobal pa mi potem javi napako :
Dim k1 As Integer
Dim k2 As Integer
k1 = ActiveCell.Column ->Tukaj mi javi da Spremenjlivka ni nastavljena !
k2 = ActiveCell.row
Dim k1 As Integer
Dim k2 As Integer
k1 = ActiveCell.Column ->Tukaj mi javi da Spremenjlivka ni nastavljena !
k2 = ActiveCell.row
Take me down to the paradise city
Where the grass is green
And the girls are pretty
Where the grass is green
And the girls are pretty

Tutankhamun ::
a maš v sub() funkciji ?
sub neki ()
Dim k1 As Integer
Dim k2 As Integer
k1 = ActiveCell.Column
k2 = ActiveCell.Row
Cells(k2, k1) = "ta celica je oznacena"
End Sub
sub neki ()
Dim k1 As Integer
Dim k2 As Integer
k1 = ActiveCell.Column
k2 = ActiveCell.Row
Cells(k2, k1) = "ta celica je oznacena"
End Sub
AMD Phenom QUAD 9950 Black Edition, 8GB
Vredno ogleda ...
Tema | Ogledi | Zadnje sporočilo | |
---|---|---|---|
Tema | Ogledi | Zadnje sporočilo | |
» | rabib vba kodo za shranjevanje v bin (iz excella)Oddelek: Programiranje | 939 (721) | Silikon |
» | Calc/excel delo s tabeloOddelek: Programiranje | 1533 (1300) | salabajs |
» | excel+visual basicOddelek: Pomoč in nasveti | 1645 (1532) | švrk |
» | [Excel] Deljenje vrednosti celice in izpis rezultataOddelek: Programiranje | 2708 (2599) | Zupa852 |
» | Microsoft Excel - merged cells/insert row ...Oddelek: Programska oprema | 1219 (1168) | Tutankhamun |