 |
|
|
Elektronika.lt portalo forumas
Jūs esate neprisijungęs lankytojas. Norint dalyvauti diskusijose, būtina užsiregistruoti ir prisijungti prie forumo.
Prisijungę galėsite kurti naujas temas, atsakyti į kitų užduotus klausimus, balsuoti forumo apklausose.
Administracija pasilieka teisę pašalinti pasisakymus bei dalyvius,
kurie nesilaiko forumo taisyklių.
Pastebėjus nusižengimus, prašome pranešti.
Dabar yra 2025 02 12, 09:36. Visos datos yra GMT + 2 valandos.
|
|
|
 |
Forumas » Mokslai » Excel koduote
|
Jūs negalite rašyti naujų pranešimų į šį forumą
Jūs negalite atsakinėti į pranešimus šiame forume
Jūs negalite redaguoti savo pranešimų šiame forume
Jūs negalite ištrinti savo pranešimų šiame forume
Jūs negalite dalyvauti apklausose šiame forume
|
|
|
 |
Excel koduote |
 Parašytas: 2015 05 08, 13:34 |
  |
|
|
|
| Sveiki, reikia pagalbos su Excel programa. Man reikia žodį "KAIMAS" užkoduoti, taip jog PVZ, Raidė K būtų raide A, arba raidė M pasidarytų B, žodžiu apsikeistų vietomis . Žodis Kaimas = AKŪBKĘ (užkoduodas gautusi taip). Žinau, kad su komanda =IF arba vlookup reikia daryt. Gal kas galėtų pagelbėt. |
|
Paskutinį kartą redagavo M3ntas, 2015 05 08, 21:11. Redaguota 2 kartus(ų) |
|
|
|
|
Excel koduote |
| Parašytas: 2015 05 08, 15:28 |
|
|
|
|
| Su if tai kažkaip nujaučiu, kad nelabai gausis arba ilgai ir nuobodžiai teks žaisti. Manau gali tekti paprogramuoti biški. Anyway, niekas čia tau to už ačiū nepadarys. |
|
|
|
|
|
|
Excel koduote |
| Parašytas: 2015 05 08, 16:51 |
|
|
|
|
Su VBA vos keletas eiluciu
| Kodas: |
Function Encode(ByVal tekstas As Range, ByVal abecele As Range, ByVal poslinkis As Range) As String
Dim KOD, TXT, ABC As String
Dim I, J, L As Integer
KOD = ""
TXT = tekstas.Value
ABC = abecele.Value
L = Len(ABC)
For I = 1 To Len(TXT)
J = InStr(1, ABC, Mid(TXT, I, 1))
If J > 0 Then
J = J + poslinkis.Value
If J < 1 Then J = J + L
If J > L Then J = J - L
KOD = KOD & Mid(ABC, J, 1)
End If
Next I
Encode = KOD
End Function
|
paskui:
=Encode(tekstas;abecele;poslinkis)
kur atatinkamai nuriodai celes |
|
|
|
|
|
|
Excel koduote |
| Parašytas: 2015 05 08, 17:26 |
|
|
|
|
Algis, dėkui, bet reikia su excel padaryt.
Pirmą išsiaiškinau kaip reikia patraukt raides per tris vieta. Komanda
=INDEX($A$1:$AI$1;1;MATCH(A6;$A$1:$AI$1;0)+3)
Dabar kita problema, raides reikia apkeist vietomis ir nežinau kokia komanda tai padaryt. |
|
|
|
|
|
|
Excel koduote |
| Parašytas: 2015 05 08, 18:47 |
|
|
|
|
| VBA ir yra Excel dalis, o tekstas, abecele ir poslinkis i f-ja perduodami kaip celes |
|
|
|
|
|
|
Excel koduote |
| Parašytas: 2015 05 08, 19:27 |
|
|
|
|
Ko truksta šitam skaičiavime, kad radęs K raidę apkeistų ją vietom, būtų A raidė.
=VLOOKUP(A6;A1:P2;1;FALSE) |
|
|
|
|
|
|
Excel koduote |
| Parašytas: 2015 05 08, 19:47 |
|
|
|
|
| Su VLOOKUP atskirų simbolių tekste neapkeisi - tam reikia atskiras raides pirma išrinkti. Naudok VBA kodą tokiem tikslam. |
|
|
|
|
|
|
Excel koduote |
| Parašytas: 2015 05 08, 21:10 |
|
|
|
|
Su hlookup pasidariau, galit trint tema aciu  |
|
|
|
|
|
|
Excel koduote |
| Parašytas: 2015 05 08, 21:31 |
|
|
|
|
na, nepabosta man vis kartotis:
tai kai jau atsakymas yra, tai jau ir trint? o vartotojo vardą irgi ištrinsi? tai koks tada tikslas išvis internete klaust? paskambini, paklausai, padarai ir nėra jokių pėdsakų kad klausimas buvo..
kodėl negalima pateikti savo atsakymo, aprašyti kaip sekėsi, ir kodėl pasirinkta taip ar anaip? |
|
|
|
|
|
|
Excel koduote |
| Parašytas: 2015 05 08, 21:40 |
|
|
|
|
| Tema galima užrakint o ne trint. |
|
|
|
|
|
|
Excel koduote |
| Parašytas: 2015 05 08, 22:21 |
|
|
|
|
| M3ntas rašo: |
| Su hlookup pasidariau, galit trint tema aciu |
Tik buk geras, niekam nepasakok kaip padarei, kad kiti nezinotu. |
|
|
|
|
|
|
Excel koduote |
| Parašytas: 2015 05 09, 08:21 |
|
|
|
|
| Socrates rašo: |
| M3ntas rašo: |
| Su hlookup pasidariau, galit trint tema aciu |
Tik buk geras, niekam nepasakok kaip padarei, kad kiti nezinotu. |
Jai ka tai parasyta yra. |
|
|
|
|
|
|
 |
Google paieška forume |
|
|
|
Naujos temos forume |
|
|
FS25 Tractors
Farming Simulator 25 Mods,
FS25 Maps,
FS25 Trucks |
|
ETS2 Mods
ETS2 Trucks,
ETS2 Bus,
Euro Truck Simulator 2 Mods
|
|
FS22 Tractors
Farming Simulator 22 Mods,
FS22 Maps,
FS25 Mods |
|
VAT calculator
VAT number check,
What is VAT,
How much is VAT |
|
LEGO
Mänguköök,
mudelautod,
nukuvanker |
|
KCD2 Mods
Installing KCD 2 Mods,
KCD 2 Guides,
KCD 2 Cheats |
|
FS25 Mods
FS25 Harvesters,
FS25 Tractors Mods,
FS25 Maps Mods |
|
Dantų protezavimas
All on 4 implantai,
Endodontija mikroskopu,
Dantų implantacija |
|
FS25 Mods
FS25 Maps,
FS25 Cheats,
FS25 Install Mods |
|
GTA 6 Wiki
GTA 6 Map,
GTA 6 Characters,
GTA 6 News |
|
FS25 Mods
Farming Simulator 25 Mods,
FS25 Maps |
|
ATS Trailers
American Truck Simulator Mods,
ATS Trucks,
ATS Maps |
|
|
 |
