给我一个vba使用findwins找到目标窗口，并发送alt+f命令

在VBA中，直接使用`FindWindow`函数通常是用来操作Windows应用程序的，而不是像在Excel中发送键盘快捷键那样操作内部界面。不过，如果你的目标是通过VBA模拟发送键盘输入到外部程序，可以使用Windows API提供的`SendInput`函数。

然而，由于`SendInput`涉及底层系统操作，VBA本身并不直接支持。在这种情况下，你需要借助其他的工具或者第三方库，例如AutoIt脚本语言（可以通过调用AutoIt COM对象来执行）。以下是一个简单的示例，展示如何使用AutoIt从VBA调用，找到并发送按键：

Sub SendKeysToExternalApp()
    Dim oShell As Object
    Set oShell = CreateObject("WScript.Shell")
    
    ' 创建一个字符串，模拟Alt+F组合键
    Dim keyPress As String
    keyPress = "{F6}" ' Alt + F
    
    ' 调用AutoIt发送这个键
    oShell.Send keyPress, True ' 第二个参数表示高精度模式，适用于模拟特殊键
    
    Set oShell = Nothing
End Sub

这段代码会尝试向当前焦点的窗口发送Alt+F组合键。请注意，这需要AutoIt在系统中已经安装并且注册了COM对象才能正常工作。

如果你想结合`FindWindow`找到特定窗口后再发送快捷键，那么你需要先找到该窗口句柄，然后传递给`SendInput`。这部分操作就会变得复杂，因为涉及到进程间通信（IPC）和精确定位，超出了VBA的常规功能范围。