Jump to content

Leaderboard

Popular Content

Showing content with the highest reputation on 03/20/2024 in all areas

  1. It works ! Many thanks to all of you. 🙂 Local $oRange = $oWorkbook.Sheets(1).Range("E:F") $oRange.UnMerge() $oRange = $oWorkbook.Sheets(1).Range("E:E") Local $oList = $oRange.SpecialCells($xlCellTypeBlanks) ConsoleWrite($oList.count & " empty cells found" & @CRLF) For $oCell In $oList ConsoleWrite($oCell.Address & @CRLF) Next
    2 points
  2. I hope this .css file helps someone. Just rename default - dark.css to default.cssdefault - dark.zip taurus905
    2 points
  3. @bladem2003, the menu is changed by your windows theme.
    1 point
  4. No confusion. I had to add it to see the results. I have things to do right now but later, I'll post a revised test and if a CSS can be made to make the "Open this Script" look and feel like the "Copy to clipboard" or any other link ( other than size maybe ), then I can jump into building the help file with this new looks, to replace the current one in distribution. If the CSS can be done using the current CSS values without having to introduce the class="openThisScript" better. I should put together a package/script to give the testers/developers, the ability to edit the HTM file and a click-click later, voilà ( i don't know French but this word means "there" with an air of magic in it to me ), the HTM as CHM to see on screen and test.
    1 point
  5. @water @argumentum Thanks for testing. Now we know that the code I provided is not working as expected on Win11...Makes me wonder.
    1 point
  6. Sure. I moved "openThisScript" up to the other link settings, (line 166). AutoIt CSS.zip
    1 point
  7. I see the same behaviour. Seems W10/11 does not keep old notifications.
    1 point
  8. I'd like to take a look at your CSS. Me not knowing much about CSS 😅
    1 point
  9. I think you missed this on the first line? <!DOCTYPE html> Seems to fix it for me anyway. Looks amazing! [Removed Pic for room]
    1 point
  10. Look at https://www.reddit.com/r/windows/comments/sy8gfo/can_i_stop_notifications_from_just_disappearing/ Let me know if it works in Win11
    1 point
  11. Chazg, My pleasure - glad you found the UDF useful. M23
    1 point
  12. Chazg, Did you look at my Notify UDF? M23
    1 point
  13. Ah, I see. Thanks for the clarification. It's far from done, (if I ever will call it done ), still tinkering, and it is still messy with commented out trials. But here it is. I may have missed some stuff, not sure yet. And I'm still deciding on colours 😕 (Removed File)
    1 point
  14. ..it'd be flawless anyway. But I meant the whole bulk at once, so I don't have to attend to odd cases. It looks that way because it did not find AutoIt.css on the same folder. Do post, or PM me, the CSS you're working on @donnyh13.
    1 point
  15. With using GDI to create JPGs to colors are always off. The problem (after reading your edits) is probably due to the fact that GDI+ uses 4:1:1 subsampling for JPG files in it's default Encoder. The issue is that GDI+ enables chroma subsampling which modifies the color values accordingly. That's why I use this program in BIC. I first write any resulting bitmap to a lossless temporary PNG file, and then convert it using "jpge". https://code.google.com/archive/p/jpeg-compressor/ Alternatively you can always convert the output to PNG, where the output files are similarly small as with JPG imho (with the right settings), but lossless and with correct colors.
    1 point
  16. Normally I would have asked you to show what you have tried, but since I have the example up and ready, here you go : #NoTrayIcon #include <APIShellExConstants.au3> #include <WinAPIShellEx.au3> Opt("MustDeclareVars", True) OnAutoItExitRegister(OnAutoItExit) HotKeySet("{ESC}", Terminate) Local $hGUI = GUICreate("") ; prepare data Global $tNOTIFYICONDATA = DllStructCreate($tagNOTIFYICONDATA_V4) $tNOTIFYICONDATA.Size = DllStructGetSize($tNOTIFYICONDATA) $tNOTIFYICONDATA.hWnd = $hGUI $tNOTIFYICONDATA.Flags = $NIF_ICON + $NIF_TIP $tNOTIFYICONDATA.tip = "Test" $tNOTIFYICONDATA.Version = 4 ; create icon $tNOTIFYICONDATA.ID = 2 $tNOTIFYICONDATA.hIcon = _WinAPI_ShellExtractIcon(@SystemDir & '\shell32.dll', 166, 16, 16) _WinAPI_ShellNotifyIcon($NIM_ADD, $tNOTIFYICONDATA) ; push notification $tNOTIFYICONDATA.Flags = $NIF_INFO $tNOTIFYICONDATA.Info = "Info 256 bytes" $tNOTIFYICONDATA.InfoTitle = "Info title 64 bytes" $tNOTIFYICONDATA.InfoFlags = $NIIF_USER ; user icon $tNOTIFYICONDATA.hBalloonIcon = _WinAPI_ShellExtractIcon(@SystemDir & '\shell32.dll', 130, 16, 16) _WinAPI_ShellNotifyIcon($NIM_MODIFY, $tNOTIFYICONDATA) While Sleep(100) WEnd Func OnAutoItExit() ; delete icon _WinAPI_ShellNotifyIcon($NIM_DELETE, $tNOTIFYICONDATA) EndFunc ;==>OnAutoItExit Func Terminate() Exit EndFunc
    1 point
  17. Technically Column F is empty, only Column E contains the data. Try one column at a time. And skip the second column of merged cells. Local $oRange = $oWorkbook.Sheets(1).Range("E:E") Local $oList = $oRange.SpecialCells($xlCellTypeBlanks)
    1 point
  18. You may need to unmerge the "fusionned" cells before : ... Local $oRange = $oWorkbook.Sheets(1).Range("E:F") $oRange.UnMerge() Local $oList = $oRange.SpecialCells($xlCellTypeBlanks) ... untested (too old ms-excel)
    1 point
  19. Andreik

    AutoIt Inline Assembly UDF

    I don't have the original UDF but some time ago I rewrote ward's BinaryCall.au3 to work with native DllCallAddress() and did some work also in this area of inline ASM. Here are the sources and a demo if you are interested. Edit: found in my archive ward's enhanced FASM UDF, so I uploaded here. FASM.zip
    1 point
  20. Chazg, I cannot help with the Win 11 problem, but using my Notify UDF (the link is in my sig) will offer you an alternative method of displaying the results from your exe. M23
    1 point
  21. More special ranges can be found in the wiki.
    1 point
  22. A bit of a different approach : #include <Excel.au3> Local $oExcel = _Excel_Open() Local $oWorkbook = _Excel_BookOpen($oExcel, @ScriptDir & "\_Excel1.xls") Local $oRange = $oWorkbook.Sheets(1).Range("A1:K7") Local $oList = $oRange.SpecialCells($xlCellTypeBlanks) ConsoleWrite($oList.count & " empty cells found" & @CRLF) For $oCell In $oList ConsoleWrite($oCell.Address & @CRLF) Next $oList.value = "<<Empty>>"
    1 point
×
×
  • Create New...