Chirurgia spinală minim invazivă
Chirurgia spinală minim invazivă oferă pacienților oportunitatea unui tratament eficient, permițându-le o recuperare ultra rapidă și nu în ultimul rând minimizând leziunile induse chirurgical. Echipa noastră utilizează un spectru larg de tehnici minim invazive, din care enumerăm câteva: endoscopia cu variantele ei (transnazală, transtoracică, transmusculară, etc), microscopul operator, abordurile trans tubulare și nu în ultimul rând infiltrațiile la toate nivelurile coloanei vertebrale. www.neurohope.ro |
Excel auto increment
Last Updated: Nov 07 2011 20:15, Started by
Pasion
, Nov 02 2011 15:42
·
0
#1
Posted 02 November 2011 - 15:42
Salut,
Ma tot chinui sa fac in excel un autoincrement number ca cel din access , am reusit sa fac ceva dar nu este chiar cea ce doresc eu, Option Explicit Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column > 1 And Target.Column <= 7 And Target.Row > 1 Then Cells(Target.Row, 1).Value = Target.Offset(-1, -1).Value + 1 Else: Cells(1, 1).Value = 1 End If End Sub Deoarece daca stergi linia respectiva si inaintea ei e 2 pune 3 nu 4 cum as dori eu. Cea ce as dori este un counter care sa tina minte la ce pozitie a ramas si sa dea cheie unica informatiilor inserate pe randul respectiv. Are cineva vreo ideie ce as putea face Multumesc Multumesc |
#2
Posted 07 November 2011 - 20:15
E mai complicat pentru ca la stergere nu ai event de care sa te legi. Ar fi cateva solutii bune pe aici.
Pune o variabila globala pentru autoincrement (inainte de SheetChange). Private COUNTER as Long (sau public daca vrei sa-l accesezi din alte module)Lucreaza cu asta, de exemplu COUNTER =Target.Offset(-1, -1).Value + 1si la sfarsit schimbi valoarea din prima coloana pentru autoincrement Cells(Target.Row, 1).Value=COUNTERDaca ultima linie se sterge, il incrementezi. Daca nu, il lasi asa. Pentru ultima linie vezi ce face ActiveSheet.UsedRange. Ai mai putea sa incerci sa pui increment la urmatoarea linie dinainte (se modifica prima linie, pui 1 si pui si 2 la urmatoarea; se modifica linia 2, pui 3 la urmatoarea, samd). Asta cread ca ar rezolva problema. |
Anunturi
▶ 0 user(s) are reading this topic
0 members, 0 guests, 0 anonymous users