Pular para o conteúdo principal

Destaques

Entendendo o Modoo Thinking

>Creditos: Pexels >Entendendo o Modo Thinking Thinking: O>O Modo Thinking é um avananço significativo na IA, pois pois permite que o software decida so sozinho quando utilizar este modo de de pensamento. Isto é especialmente especialmente útil em ambientes empresariaisisis, onde decisões precisas e e rápidas são cruciais.... A principal tecnologia por trásás disso é a capacidade do do sistema de identificar situaçõesções em que o Modo Thinking deve deve ser aplicado. PassPassos Práticos para Integraegração de IA em Processos Oper Operacionais: Identifique os process processos onde a velocidade e e e precisão são fundamentais. Avalie como integr integrar o Modo Thinking com os os sistemas atuais. Treine a equipe equipe para utilizar as ferramentas da do novo modelo, incluindo man treinamento sobre seu funcionamento. MonMonitore o desempenho e e ajuste os processos conforme necessário necessários. Integre o o Modo Thinking com outros sistemas,, se necessário. C>Crie um flux...

Como escanear documentos diretamente no Excel


Você quer saber como escanear  documentos diretamente no Excel?

Você pode fazer usando macro no Excel.

No vídeo mostro como inserir a macro para realizar o escaneamento de documentos diretamente no Excel e como criar um botão para automatizar o scan.

Dica: salve a planilha de macro em uma pasta que você não irá apagar este arquivo.
Os drivers do scanner foram instalados pelo próprio Windows 10, plug in play.

Link para o vídeo de como escanear documentos diretamente no Word: https://youtu.be/Z2S_p0nu5x8


Código da Macro:

' Scan for Excel 2013/2016
' Author: Günter Born www.borncity.de www.borncity.com/blog
' Changed to implement the scan in Excel by Augusto
' Implements a Scan function in Excel 2013/2016

Sub Scan()
'
' Scan Macro, to be invoked in Excel
'
  On Error Resume Next
     Dim objCommonDialog As WIA.CommonDialog
     Dim objImage As WIA.ImageFile
     Dim strDateiname
     ' instantiate Scan WIA objects
     Set objCommonDialog = New WIA.CommonDialog
     Set objImage = objCommonDialog.ShowAcquireImage
   
     ' set temporary file
     strDateiname = Environ("temp") & "\Scan.jpg"
   
     If Not objImage Is Nothing Then
       Kill strDateiname 'delete old file
       ' save into temp file
       objImage.SaveFile strDateiname
       ' insert into document
        ActiveSheet.Pictures.Insert(strDateiname).Select

       Set objImage = Nothing
     End If
     Set objCommonDialog = Nothing

   ' MsgBox strDateiname  ' test output
End Sub



*****************************************************

Imagem na Teia nas redes sociais:

Blog - http://imagemnateia.blogspot.com
YouTube - https://www.youtube.com/Imagemnateia
Twitter - @imagemnateia
Instagram - @imagemnateia
Google+ - plus.google.com/+ImagemnateiaBlogspot

Comentários

Postagens mais visitadas