Excel
W
R
2005-10-17 20:33
Rola_ndas
2011-09-11 03-52
A_Arvis rašė: ir vel reik helpo
Kazkada lyg ir bandziau, bet nebepamenu ar yra formule kuri pazintu cele kaip su irasu ar be. Celeje gali buti ir skaicius ir tekstas arba nieko. Jei kas zinot padekit pls.
jojo, nesupratau nieko...
paaiškink koks tokio atskirimo tikslas... gal formule atseksima...
panašiai daro count(x:y)
A_Arvis rašė: ir vel reik helpo
Kazkada lyg ir bandziau, bet nebepamenu ar yra formule kuri pazintu cele kaip su irasu ar be. Celeje gali buti ir skaicius ir tekstas arba nieko. Jei kas zinot padekit pls.jojo, nesupratau nieko...
paaiškink koks tokio atskirimo tikslas... gal formule atseksima...
panašiai daro count(x:y)
W
2005-10-17 20:38
Wertis
2011-09-11 03-52
klaipėdiečiai klaipėdiečiams. Klaipėda - Lietuvos Excel sostinė! 
klaipėdiečiai klaipėdiečiams. Klaipėda - Lietuvos Excel sostinė! A
2005-10-17 20:45
A_Arvis
kalba apie tai i B2 reik tokios formules =IF(A1= jei yra yrasyta kas nors;"Gerai";"Blogai")
Wetis> Klaipedos sostine "Švyturys"
Wetis> Klaipedos sostine "Švyturys"
A
2005-10-17 20:47
A_Arvis
Wertis o nuo formules atsakymo neina padaryti macru paleidimo ar tik nuo tiesioginio yraso jie tegali suveikti?
W
2005-10-17 20:51
Wertis
2011-09-11 03-52
A_Arvis rašė: kalba apie tai i B2 reik tokios formules =IF(A1= jei yra yrasyta kas nors;"Gerai";"Blogai")
Wetis> Klaipedos sostine "Švyturys"
=if(isblank(A1);"Blogai;"Gerai")
arba
=if(A1<>"";"Gerai";"Blogai")
A_Arvis rašė: kalba apie tai i B2 reik tokios formules =IF(A1= jei yra yrasyta kas nors;"Gerai";"Blogai")
Wetis> Klaipedos sostine "Švyturys"
=if(isblank(A1);"Blogai;"Gerai")
arba
=if(A1<>"";"Gerai";"Blogai")
W
2005-10-17 21:02
Wertis
2011-09-11 03-52
A_Arvis rašė: Wertis o nuo formules atsakymo neina padaryti macru paleidimo ar tik nuo tiesioginio yraso jie tegali suveikti?
sugalvojau, eina! tai realizuoja sekantis kodas:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
If Target.Text <> "" Then
MsgBox "Làstelë " & Target.Address & " ne tuðèia"
Else
MsgBox "Làstelë " & Target.Address & "tuðèia"
End If
End If
End Sub
A_Arvis rašė: Wertis o nuo formules atsakymo neina padaryti macru paleidimo ar tik nuo tiesioginio yraso jie tegali suveikti?
sugalvojau, eina! tai realizuoja sekantis kodas:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
If Target.Text <> "" Then
MsgBox "Làstelë " & Target.Address & " ne tuðèia"
Else
MsgBox "Làstelë " & Target.Address & "tuðèia"
End If
End If
End Sub
A
2005-10-17 21:10
A_Arvis
2011-09-11 03-52
=if(isblank(A1);"Blogai;"Gerai")
arba
=if(A1<>"";"Gerai";"Blogai")
[/quote]
Wertis Dekui
arba
=if(A1<>"";"Gerai";"Blogai")
[/quote]
Wertis Dekui
A
2005-10-17 21:16
A_Arvis
2011-09-11 03-52
Wertis rašė:
A_Arvis rašė: Wertis o nuo formules atsakymo neina padaryti macru paleidimo ar tik nuo tiesioginio yraso jie tegali suveikti?
sugalvojau, eina! tai realizuoja sekantis kodas:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
If Target.Text <> "" Then
MsgBox "Làstelë " & Target.Address & " ne tuðèia"
Else
MsgBox "Làstelë " & Target.Address & "tuðèia"
End If
End If
End Sub
Nu man uzkart erora meta ir perkelia mane i VBE pazymedama sia eilute:
Private Sub Worksheet_Change(ByVal Target As Range)
Wertis rašė:
A_Arvis rašė: Wertis o nuo formules atsakymo neina padaryti macru paleidimo ar tik nuo tiesioginio yraso jie tegali suveikti?
sugalvojau, eina! tai realizuoja sekantis kodas:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
If Target.Text <> "" Then
MsgBox "Làstelë " & Target.Address & " ne tuðèia"
Else
MsgBox "Làstelë " & Target.Address & "tuðèia"
End If
End If
End Sub
Nu man uzkart erora meta ir perkelia mane i VBE pazymedama sia eilute:
Private Sub Worksheet_Change(ByVal Target As Range)
A
2005-10-17 21:26
A_Arvis
2011-09-11 03-52
Wertis rašė: kol nematysiu nelabai ką padėsiu..
Raso teip: Compile error: Ambiguous neme detected: Worksheet_Change
Wertis rašė: kol nematysiu nelabai ką padėsiu..
Raso teip: Compile error: Ambiguous neme detected: Worksheet_Change
W
2005-10-17 21:27
Wertis
2011-09-11 03-52
A_Arvis rašė: O pranesimus eina gauti su Data/Validation... iš klausimo matau, jog žinai, kad eina. pranešimus apie ką ir kam? visada konkretizuok apie ką kalbi.
A_Arvis rašė: O pranesimus eina gauti su Data/Validation...
A
2005-10-17 21:42
A_Arvis
2011-09-11 03-52
Wertis rašė:
A_Arvis rašė: O pranesimus eina gauti su Data/Validation... iš klausimo matau, jog žinai, kad eina. pranešimus apie ką ir kam? visada konkretizuok apie ką kalbi.
Nu vsio jau musiek reik jungti lauk ta kompa, arba reik "Švyturio" atsidaryti.
Taip sutinku neaiskiai issireiskiau, Sorry. Cia kiek supratau turetu ismesti pranesima (o gal klystu):
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
If Target.Text <> "" Then
MsgBox "Làstelë " & Target.Address & " ne tuðèia"
Else
MsgBox "Làstelë " & Target.Address & "tuðèia"
End If
End If
End Sub
Todel kazkaip atsiminiau apie ismetamus prnesimus Validation...
O sis mano teiginys tai skirtas prie preitos savaites temos:
Wertis o nuo formules atsakymo neina padaryti macru paleidimo ar tik nuo tiesioginio yraso jie tegali suveikti?
Nes ta problema kuria tu isprendei i formuliu atsakyma jos nereguoja, kas butu kai kur tikrai neprosal.
Wertis Nepyk jei as cia gryba pjaunu.
Wertis rašė:
A_Arvis rašė: O pranesimus eina gauti su Data/Validation...
Nu vsio jau musiek reik jungti lauk ta kompa, arba reik "Švyturio" atsidaryti.
Taip sutinku neaiskiai issireiskiau, Sorry. Cia kiek supratau turetu ismesti pranesima (o gal klystu):
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
If Target.Text <> "" Then
MsgBox "Làstelë " & Target.Address & " ne tuðèia"
Else
MsgBox "Làstelë " & Target.Address & "tuðèia"
End If
End If
End Sub
Todel kazkaip atsiminiau apie ismetamus prnesimus Validation...
O sis mano teiginys tai skirtas prie preitos savaites temos:
Wertis o nuo formules atsakymo neina padaryti macru paleidimo ar tik nuo tiesioginio yraso jie tegali suveikti?
Nes ta problema kuria tu isprendei i formuliu atsakyma jos nereguoja, kas butu kai kur tikrai neprosal.
Wertis Nepyk jei as cia gryba pjaunu.
W
2005-10-17 21:59
Wertis
2011-09-11 03-52
jo, tu teisus. susimaišiau. į formulių rezultatą nereaguoja. kaip ir galima būtų padaryti ir taip, bet jau čia būtų per aplinkui. kadangi nėra procedūros kuri reaguotų į pasikeitusią formulės apskaičiuotą reikšmę. kaip galima būtų tai apeiti? gremėzdiškai. ląstelės, kurioje yra formulė, reikšmę išsisaugoti kurioje nors kitoje ląstelėje(x), o procedūrai sureagavus į pokyčius bet kurioje ląstelėje atlikti sulyginimą ar ląstelės su formule reikšmė atitinka ląstelės x reikšmę. jei ne - vykdyti tam tikras komandas. va
R
2005-10-18 09:15
Rola_ndas
2011-09-11 03-52
Wertis rašė: jo, tu teisus. susimaišiau. į formulių rezultatą nereaguoja. kaip ir galima būtų padaryti ir taip, bet jau čia būtų per aplinkui. kadangi nėra procedūros kuri reaguotų į pasikeitusią formulės apskaičiuotą reikšmę. kaip galima būtų tai apeiti? gremėzdiškai. ląstelės, kurioje yra formulė, reikšmę išsisaugoti kurioje nors kitoje ląstelėje(x), o procedūrai sureagavus į pokyčius bet kurioje ląstelėje atlikti sulyginimą ar ląstelės su formule reikšmė atitinka ląstelės x reikšmę. jei ne - vykdyti tam tikras komandas. va
Na, o negalima taip, susikurti forma, kuri automatiskai atsidaro atidarant excel, taciau yra nematoma (ar paslepta). Tada, keiciantis tam tikros celės skaiciui keiciasi reiksme formoje, o nuo reiksmes formoje vyktu macro komandu pasikeitimai.
Antra vertus paprasciausia butu sukurti viena macro komanda, kurios viduje butu kitos komandos, ir paleisti pasidaryto klaviso (ekrane) paspaudimu, ar klavisiu kombinacijos paspaudimu. Tai buti irgi paprasta.
Wertis rašė: jo, tu teisus. susimaišiau. į formulių rezultatą nereaguoja. kaip ir galima būtų padaryti ir taip, bet jau čia būtų per aplinkui. kadangi nėra procedūros kuri reaguotų į pasikeitusią formulės apskaičiuotą reikšmę. kaip galima būtų tai apeiti? gremėzdiškai. ląstelės, kurioje yra formulė, reikšmę išsisaugoti kurioje nors kitoje ląstelėje(x), o procedūrai sureagavus į pokyčius bet kurioje ląstelėje atlikti sulyginimą ar ląstelės su formule reikšmė atitinka ląstelės x reikšmę. jei ne - vykdyti tam tikras komandas. va
Na, o negalima taip, susikurti forma, kuri automatiskai atsidaro atidarant excel, taciau yra nematoma (ar paslepta). Tada, keiciantis tam tikros celės skaiciui keiciasi reiksme formoje, o nuo reiksmes formoje vyktu macro komandu pasikeitimai.
Antra vertus paprasciausia butu sukurti viena macro komanda, kurios viduje butu kitos komandos, ir paleisti pasidaryto klaviso (ekrane) paspaudimu, ar klavisiu kombinacijos paspaudimu. Tai buti irgi paprasta.
W
A
2005-10-18 22:27
A_Arvis
Sveiki! Gal galetumet dar viena paslapti atskleisti :)
kai i worksheeta irasomas vienas kodas Private Sub Worksheet_Change(ByVal target As Range) irasius antra private sub... jie kaip ir pjautis tarpusavyje pradeda, gal juos reik kazkaip uzvadinti kazkaip tipo Private sub1 Private sub2 ?
Dekui
kai i worksheeta irasomas vienas kodas Private Sub Worksheet_Change(ByVal target As Range) irasius antra private sub... jie kaip ir pjautis tarpusavyje pradeda, gal juos reik kazkaip uzvadinti kazkaip tipo Private sub1 Private sub2 ?
Dekui
W
2005-10-18 23:37
Wertis
2011-09-11 03-52
A_Arvis rašė: Sveiki! Gal galetumet dar viena paslapti atskleisti :)
kai i worksheeta irasomas vienas kodas Private Sub Worksheet_Change(ByVal target As Range) irasius antra private sub... jie kaip ir pjautis tarpusavyje pradeda, gal juos reik kazkaip uzvadinti kazkaip tipo Private sub1 Private sub2 ?
Dekui tai jau taip. bet į lentelės pokyčius reaguos vien tik originalus pavadinimas.
A_Arvis rašė: Sveiki! Gal galetumet dar viena paslapti atskleisti :)
kai i worksheeta irasomas vienas kodas Private Sub Worksheet_Change(ByVal target As Range) irasius antra private sub... jie kaip ir pjautis tarpusavyje pradeda, gal juos reik kazkaip uzvadinti kazkaip tipo Private sub1 Private sub2 ?
Dekui
K
Tax.lt © 2002 - 2024, admin@tax.lt,
Reklama tax.lt
Buhalterinės apskaitos sistema internete smulkiam ir vidutiniam verslui