Jsou zobrazeny jen nové odpovědi. Zobrazit všechny
Předmět Autor Datum
Můžeš mi to se prosím nahrát ? =DOSADIT(List1, a, b) mi nefunguje :-( ani replace = DOsadit (list1,…
Achmedik 24.04.2009 17:06
Achmedik
Ty mas ten Excel osekany tak, ze tam nemas help? nebo jsi liny se do toho helpu podivat? Funkce nah…
Jan Fiala 24.04.2009 20:11
Jan Fiala
no jo ale všichni mu tu píšou vzorec ale ne to potřebuju přes commandbutton. Ne =Dosadit(blablabla)
Achmedik 25.04.2009 22:37
Achmedik
Napis si to jako udalost buttonu
Jan Fiala 25.04.2009 23:44
Jan Fiala
udalost buttonu ? to jsem ještě neslyšel podívám se po netu dík a pak napíšu :-)
Achmedik 25.04.2009 23:52
Achmedik
Jaky CommandButton si predstavujes? Button umisteni na listu mezi bunkami nebo tlacitko na panelu me…
Jan Fiala 26.04.2009 08:23
Jan Fiala
No ten na listu pak si otevřeš Microsoft Visual Basic CODE Private Sub CommandButton1_Click() Dim a… poslední
Achmedik 26.04.2009 10:18
Achmedik

No ten na listu pak si otevřeš Microsoft Visual Basic CODE

Private Sub CommandButton1_Click()
Dim aLine As String
aFile = FreeFile
Open "C:\Users\marek\Desktop\pro\read.txt" For Input As #aFile
'If Not EOF(aFile) Then
    Line Input #aFile, aLine
    Cells(1, 1).Value = aLine
   MsgBox ("Reading Completed")
    
    

'End If
Close #aFile
End Sub

Private Sub CommandButton2_Click()
Worksheets("List1").Range("A1:S1") = Worksheets("List2").Range("A1:S1").Value
End Sub

Tam mám toto jako načíst soubor z TXT pak ho zpopírovat na list dva a pak nemám že mám udělat ze všech áček udělat béčka a ze včech céček udělat ýčka

Zpět do poradny Odpovědět na původní otázku Nahoru