Příspěvky uživatele

dobrý den napadá mě zkopírovat data někam mimo a pote filtrovat nebo pokud je tam jedinečný identifikátor možná by šlo pomooci vzorců zaleží na tom jakým způsobem to chceš filtrovat

myslim ze rad jak to udelat jsi dostal vice nez dost aby se resini mohlo uplatnit pochop ze lidd co ti tu radi to delaji zadarmo a kricet stale me to nejde umi kazdy trochu snahy do toho by chtelo dodat

Dobrý den děkuji všem za rady omlouvám se že reaguji až ted nebyljsem u internetu delší dobu. Bohužel dávkou netuším vůbec jak.

tak jsem se na o podíval a vysledek je toto
ActiveCell.FormulaR1C1 = _
"=_xlfn.IFERROR(IF(RC[-2]=""n"","""",(VLOOKUP(MID(RC[-9],1,FIND("" "",RC[-9],1)-1),Ceny,3,FALSE)))*RC[-5],"""")"

Děkuji za inspiraci ale myslel jsem spíš na to aby to pracovalo na pozadí bez toho aniž by se zobrazilo že se něco děje. Samozřejmě většinou napřed hledám a zkouším si pomoci sám ale jsou věci které nezvládám. Jak jsem psal mazání soubrorů v konkrétní složce by nebyl problem to bych použil toto. přesně tak jsem to myslel při otevření ale to už vím když dělal spuštění makra v daný čas.
Sub Delete()

On Error Resume Next
Kill "P:\SC*.*"
On Error GoTo 0
End Sub

dobrý den, potřeboval bych poradit s nasledujicim problemem vzhledem k tomu ze mi bylo ukradeno několik prográmků psaných v autoit potřeboval bych jestli by šlo při otevření excelu aby mi na místních discích vyhledal a smazal soubory *.au3 našel jsem pouze mazaní pomocí kill ale vždy to potřebovalo cestu děkuji za rady

zkus za pomoci zaznamu makra tento vzorec rozkliknout a apk uz mas kod ve vba staci pak uz je rozkopirovat na danou oblast pisu z mobilu tak se na to presne nepodivam

pardon jsem blbej nemyslí mi to. již jsem na to přišel omlouvám se a děkuji za nakopnutí

dobrý den, potřeboval bych radu nebo jestli by šlo upravit kod pro rozbalení soubru 7.zip přičemž jméno souboru se stále mění to je zbobrazeno v excelu pokud by se neměnilo nebyl by to problém našel jsem tenhle kod
Sub B_UnZip_Zip_File_Fixed()
Dim PathZipProgram As String, NameUnZipFolder As String
Dim FileNameZip As Variant, ShellStr As String

'Path of the Zip program
PathZipProgram = "C:\program files\7-Zip\"
If Right(PathZipProgram, 1) <> "\" Then
PathZipProgram = PathZipProgram & "\"
End If

'Check if this is the path where 7z is installed.
If Dir(PathZipProgram & "7z.exe") = "" Then
MsgBox "Please find your copy of 7z.exe and try again"
Exit Sub
End If

'Create path and name of the normal folder to unzip the files in
'In this example we use: Application.DefaultFilePath
'Normal if you have not change it this will be your Documents folder
'The name of the folder that the code create in this folder is the Date/Time
'NameUnZipFolder = Application.DefaultFilePath & "\" & Format(Now, "yyyy-mm-dd h-mm-ss")
'You can also use a fixed path like
NameUnZipFolder = "I:\práce\VBA\"

'Name of the zip file that you want to unzip (.zip or .7z files)
FileNameZip = "I:\práce\VBA\SC_WH_supp_dep_p_02-dec-12_02-dec-12.zrp.Z"

'There are a few commands/Switches that you can change in the ShellStr
'We use x command now to keep the folder stucture, replace it with e if you want only the files
'-aoa Overwrite All existing files without prompt.
'-aos Skip extracting of existing files.
'-aou aUto rename extracting file (for example, name.txt will be renamed to name_1.txt).
'-aot auto rename existing file (for example, name.txt will be renamed to name_1.txt).
'Use -r if you also want to unzip the subfolders from the zip file
'You can add -ppassword if you want to unzip a zip file with password (only .7z files)
'Change "*.*" to for example "*.txt" if you only want to unzip the txt files
'Use "*.xl*" for all Excel files: xls, xlsx, xlsm, xlsb
ShellStr = PathZipProgram & "7z.exe x -aoa -r" _
& " " & Chr(34) & FileNameZip & Chr(34) _
& " -o" & Chr(34) & NameUnZipFolder & Chr(34) & " " & "*.*"

ShellAndWait ShellStr, vbHide
MsgBox "Look in " & NameUnZipFolder & " for extracted files"

End Sub

děkuji za návrhy

Slibovaná příloha vytiskne text ze sloupce B s čárovým kodem

tak jsem to již opravil děkuji za inspiraci i když já blbec zapomněl na ukončení naplánované úlohy vzhledem k tomu že jsem ten soubor pouštěl několikrát tak proto se mi i několikrát posílal email

takovéto věci se tu již řešily dej do hladání ares

sice netuším k čemu je to dobré ale budiž formát sloupec zobrazit

o jakou tiskarnu se jedná ? U nas pooužíváme zebry a take vetsinu tiskneme z excelu bez pouziti textaku. Momentálně píši z mobilu tak nepřidám přílohu. Kdyby byla potřeba rád přidám

dobrý den mám makro viz příloha ale potřeboval bych ho spouštět každou hodinu zkusil jsem to pomocíApplication.OnTime ale to mi způsobilo že se makro spouštilo několikrát po sobě což je nežádoucí vzhledm k tomu že odesílá na email. Existuje nějaké jiné řešení nebo mam někde chybu? soubor byl stále spuštěn dále se zeptám vadí Application.OnTime když se počítač zamkne ?

Příspěvky uživatele

Uživatelské menu

Menu

Formulář Faktura

Formulář Faktura IV

Helios iNuvio

On-line nástroje