No meu dia a dia, trabalho muito com transferência de dados de uma planilha para outra. Para ser capaz de fazer isso, é necessário ter certeza se o outro arquivo já está aberto ou não.
A seguir uma função em excel para verificar se uma pasta de trabalho que nós precisamos está aberta ou não.
[sourcecode highlight=”” language=”vb”]
Public Function ChecarPlanilha(sNomePlanilha As String) As Boolean
Dim wb As Workbook, bResultado As Boolean
bResultado = False
For Each wb In Application.Workbooks
If InStr(LCase(wb.Name), LCase(sNomePlanilha)) > 0 Then
bResultado = True
Exit For
End If
Next wb
ChecarPlanilha = bResultado
End Function
[/sourcecode]
Usando o nome do arquivo como um parâmetro de entrada, a função irá fazer um loop na coleção de pastas de trabalho para verificar todas que abriu. Se existe um arquivo com o mesmo nome que estamos procurando, então a função retornará verdadeiro e falso caso contrário.
[youtube=http://www.youtube.com/watch?v=KIjr1CLw3Lo]
Elquisson Lima | elkysson@gmail.com
Link permanente
Muito bom a aula! Parabéns!
Link permanente
Obrigado Carlos! Abraços!
Link permanente
Como faço para importar uma planilha de um HomeBroker?
Link permanente
Excelente!!!!